Rev Author Line No. Line
4536 jacho 1 $fn=40; // model faces resolution.
2 include <../configuration.scad>
3  
4542 jacho 4 include <WINDGAUGE01A_D01.scad>
5 include <polyScrewThread_r1.scad>
4536 jacho 6  
4542 jacho 7 PI=3.141592;
4536 jacho 8  
4542 jacho 9 //Držák anemometru
10  
11 module WINDGAUGE01A_D02()
12 {
4536 jacho 13 difference()
14 {
4542 jacho 15 union()
16 {
17 //výstuha
4666 jacho 18 translate([-D01_sirka_tyce/2+S01_sila_materialu,0,0])
4542 jacho 19 rotate ([0,-90,0])
20 linear_extrude (height = S01_sila_materialu, convexity = 10)
21 polygon(points=[[D02_vyska_uchytky/2,D01_delka_tyce+S01_prumer_vnitrni/2+D01_material_pred_zavitem+D02_sila_materialu-1],[0, D01_delka_tyce+S01_prumer_vnitrni/2+D01_material_pred_zavitem+D02_sila_materialu-1],[0,S01_prumer_vnitrni/2+D01_material_pred_zavitem],[D01_material_pod_zavitem,S01_prumer_vnitrni/2+D01_material_pred_zavitem]]);
4666 jacho 22  
23 //výstuha 2
24 translate([D01_sirka_tyce/2,0,0])
25 rotate ([0,-90,0])
26 linear_extrude (height = S01_sila_materialu, convexity = 10)
27 polygon(points=[[D02_vyska_uchytky/2,D01_delka_tyce+S01_prumer_vnitrni/2+D01_material_pred_zavitem+D02_sila_materialu-1],[0, D01_delka_tyce+S01_prumer_vnitrni/2+D01_material_pred_zavitem+D02_sila_materialu-1],[0,S01_prumer_vnitrni/2+D01_material_pred_zavitem],[D01_material_pod_zavitem,S01_prumer_vnitrni/2+D01_material_pred_zavitem]]);
4542 jacho 28  
29 //zavit
30 translate([0,0,D01_material_pod_zavitem])
31 screw_thread(S01_prumer_vnitrni-S01_tolerance_zavit,4,55,S01_vyska_spodniho_zavitu,PI/2,2);
4536 jacho 32  
4542 jacho 33 //spodní valec
34 translate([0,0,D01_material_pod_zavitem/2])
35 cylinder (h = D01_material_pod_zavitem, r=(S01_prumer_vnitrni-S01_tolerance_zavit+D01_material_pred_zavitem*2)/2, center = true, $fn=100);
36  
37 //uchyt na tyc
38 translate([0,D01_delka_tyce/2+(S01_prumer_vnitrni-S01_tolerance_zavit)/2+D01_material_pred_zavitem,D01_material_pod_zavitem/2])
39 cube([D01_sirka_tyce,D01_delka_tyce,D01_material_pod_zavitem],center=true);
40  
41 //uchyt na tyc ovalna cast
42 translate([0,(S01_prumer_vnitrni-S01_tolerance_zavit)/2+D01_material_pred_zavitem,D01_material_pod_zavitem/2])
43 cube([D01_sirka_tyce,D01_material_za_zavitem+D01_material_pred_zavitem,D01_material_pod_zavitem],center=true);
44  
45 //material kolem uchytu na sloupek
46 translate([0,D01_delka_tyce+(S01_prumer_vnitrni-S01_tolerance_zavit)/2+D01_material_pred_zavitem+(D02_sila_materialu+D02_prumer_obruby/2)/2-D02_dotahova_vzdalenost,D01_material_pod_zavitem/2])
47  
48 difference()
49 {
50 cube([D01_sirka_tyce,D02_sila_materialu+D02_prumer_obruby/2,D01_material_pod_zavitem],center=true);
51  
52 translate([0,D02_prumer_obruby/2-D02_dotahova_vzdalenost-D02_sila_materialu,0])
53 cylinder(h=D02_vyska_uchytky+0.01,r=D02_prumer_obruby/2,center=true);
54 }
55  
56 //uchyt na sloupek
57 translate([0,D01_delka_tyce+(S01_prumer_vnitrni-S01_tolerance_zavit)/2+D01_material_pred_zavitem+D02_sila_materialu+(D02_prumer_obruby)/2,D02_vyska_uchytky/2])
58 rotate(a=[0,0,270])
4666 jacho 59 WINDGAUGE01A_D01();
4542 jacho 60  
61 }
62  
63 //otvor
64 translate([0,0,(D01_material_pod_zavitem+S01_vyska_spodniho_zavitu)/2])
65 cylinder (h = D01_material_pod_zavitem+S01_vyska_spodniho_zavitu+0.02, r=((S01_prumer_vnitrni-S01_tolerance_zavit)-2*D01_material_za_zavitem)/2, center = true, $fn=100);
66  
4536 jacho 67 }
68 }
4542 jacho 69  
70 WINDGAUGE01A_D02();
4536 jacho 71  
4542 jacho 72  
73  
74