Rev Author Line No. Line
3876 kaklik 1 r = 35;
2 h = 20.32;
3 thickness = 2;
4  
5 /*
6 for(i=[0:3]){
7 translate([0,0,i*h]){shield_part();}
8 }*/
9  
10 shield_part();
11  
12 module shield_part(){
13 difference(){
14 difference(){
15 translate([0,0,0.01]){scale(0.999){part(r,h);}}
16 resize([2*r-thickness*2,2*r-thickness*2,0]){part(r,h);}
17 }
18 union(){
19 translate([0,0,1.3*h-h/8]){cube([2*r/1.5,thickness,0.3*h],center=true);
20 cube([thickness,2*r/1.5,0.3*h],center=true);}
21 }
22 }
23  
24 difference(){
25 difference(){
26 intersection(){
27 union(){
28 translate([-thickness/2,thickness-r,0]){cube([thickness,2*r-thickness*2,h]);}
29 translate([thickness-r,-thickness/2,0]){cube([2*r-thickness*2,thickness,h]);}
30 }
31 resize([2*r-thickness*2,2*r-thickness*2,0]){part(r,h);}
32 }
33 translate([0,0,-0.1]){cylinder(h=h,r=r/1.6-thickness,$fn=100);}
34 }
35 cylinder(h=h*2,r1=r/1.6-2*thickness,r2=r*0.8,$fn=100);
36 }
37 rotate([0,0,45]){
38 translate([0,0,h/6]){
39 difference(){
40 difference(){
41 cube([sqrt(2*pow(r/1.6,2)),sqrt(2*pow(r/1.6,2)),h/3],center=true);
42 cube([sqrt(2*pow(r/1.6,2))-thickness*2,sqrt(2*pow(r/1.6,2))-thickness*2,h/2],center=true);
43 }
44 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);}}
45 }
46 }
47 }
48 }
49  
50 module part(r,h){
51 difference(){
52 intersection(){
53 translate([-r,-r,0]){cube([2*r,2*r,h]);}
54 cylinder(h=h, r=r,$fn=100);
55 }
56 translate([0,0,h/5]){
57 difference(){
58 translate([-r,-r,0]){cube([r*2,r*2,h+1]);}
59 resize([0,0,h*5/3]){sphere(r=r,$fn=100);}
60 }
61 }
62 }
63 cylinder(h=1.3*h,r=r/1.5,$fn=100);
64 }