use <library.scad>


r = 35;
h = 20.32;
thickness = 2;

shield_top(r,h,thickness);

module shield_top(r,h,thickness){
        difference(){
                top(r,h);
                translate([0,0,-thickness]){top(r-thickness,h-thickness);}
        }
        difference(){
                intersection(){
                        union(){
                                translate([-thickness/2,thickness-r,0]){cube([thickness,2*r-thickness*2,h]);}
                                translate([thickness-r,-thickness/2,0]){cube([2*r-thickness*2,thickness,h]);}
                        }
                                translate([0,0,-thickness]){top(r-thickness,h-thickness);}
                }
                rotate([0,0,45]){
                                cube([sqrt(2*pow(r/1.6,2))-thickness*2,sqrt(2*pow(r/1.6,2))-thickness*2,h*5],center=true);
                }
        }

        rotate([0,0,45]){
                translate([0,0,h/6]){
                        difference(){
                                difference(){
                                        cube([sqrt(2*pow(r/1.6,2)),sqrt(2*pow(r/1.6,2)),h/3],center=true);
                                        cube([sqrt(2*pow(r/1.6,2))-thickness*2,sqrt(2*pow(r/1.6,2))-thickness*2,h/2],center=true);
                                }
                                rotate([0,90,0]){translate([0,0,-(sqrt(2*pow(r/1.6,2))+thickness)/2]){cylinder(h=sqrt(2*pow(r/1.6,2))+thickness,r=1.6,$fn=100);}}
                        }
                }
        }
}

module top(r,h){
        difference(){
                intersection(){
                        translate([-r,-r,0]){cube([2*r,2*r,h]);}
                        cylinder(h=h, r=r,$fn=100);
                }
                translate([0,0,h/5]){
                        difference(){
                                translate([-r,-r,0]){cube([r*2,r*2,h+1]);}
                                resize([0,0,h*5/3]){sphere(r=r,$fn=100);}
                        }
                }
        }
        translate([0,0,h])
        screen_holder(15, 40, 0.5);
}