Rev Author Line No. Line
3898 vinchi9 1 use <rounded_screen_bottom_b.scad>
2  
3 r = 35;
4 h = 20.32;
5 thickness = 2;
6  
7 shield_bottom(r,h,thickness);
8 //sht25(r,thickness);
9  
10 module shield_bottom(r,h,thickness){
11 difference(){
12 union(){
13 difference(){
14 cylinder(h=1.3*h,r=r/1.5,$fn=100);
15 translate([0,0,thickness]){cylinder(h=1.3*h,r=r/1.5-thickness,$fn=100);}
16 }
17 difference(){
18 translate([-r/1.5-thickness*2.5,0,10+(h-10)/2]){cube([6*thickness,thickness,h-10],center=true);}
19 rotate([90,0,0]){translate([-r/1.5-thickness*2.5,11+(h-10)/2,0]){cylinder(h=4*thickness,r=1.6,center=true,$fn=100);}}
20 }
21 }
22 union(){
23 translate([-6,6,0]){cylinder(h=thickness*3,r=6,$fn=100,center=true);}
24 translate([-10,-10,0]){cylinder(h=thickness*3,r=0.5,$fn=100,center=true);}
25 translate([0,0,1.15*h+1]){cube([3*r/1.5,thickness,0.3*h+2],center=true);
26 cube([thickness,2*r/1.5,0.3*h+2],center=true);}
27 }
28 }
29  
30 rotate([0,0,45]){
31 difference(){
32 translate([0,-(sqrt(2*pow(r/1.6,2))+thickness)/4,thickness+5]){cube([10+2*thickness,2+2*thickness,10],center=true);}
33 translate([0,-(sqrt(2*pow(r/1.6,2))+thickness)/4,thickness+30]){cube([10,2,60],center=true);}
34 }
35 }
36 difference(){
37 difference(){
38 translate([-50-r/1.5,0,6]){cube([120,15,12],center=true);}
39 cylinder(h=3*h,r=r/1.5-thickness,$fn=100,center=true);
40 }
41 translate([-140,0,0]){cylinder(h=3*20,r=10,center=true,$fn=100);}
42 }
43 translate([-140,0,0]){strap();}
44 }
45  
46 module sht25(r,thickness){
47 color("blue"){rotate([0,0,45]){translate([0,-(sqrt(2*pow(r/1.6,2))+thickness)/4,thickness+30]){cube([10,2,60],center=true);}}}
48 }