Rev 4538 Rev 4542
Line 1... Line 1...
1 $fn=40; // model faces resolution. 1 $fn=40; // model faces resolution.
2 include <../configuration.scad> 2 include <../configuration.scad>
3   3  
-   4 include <WINDGAUGE01A_D01.scad>
-   5 include <polyScrewThread_r1.scad>
4   6  
-   7 PI=3.141592;
5   8  
6 //Drzak na sloup - cast bez drzaku anemometru 9 //Držák anemometru
-   10  
7 module WINDGAUGE01A_D02(){ 11 module WINDGAUGE01A_D02()
8 12 {
9 difference() 13 difference()
10 { 14 {
11 union() 15 union()
12 { 16 {
13 //základní válec 17 //výstuha
-   18 rotate ([0,-90,0])
14 cylinder(h=D02_vyska_uchytky,r=(D02_prumer_obruby+2*D02_sila_materialu)/2,center=true); 19 linear_extrude (height = S01_sila_materialu, convexity = 10)
15 //úchytové plošky 20 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]]);
-   21
-   22 //zavit
-   23 translate([0,0,D01_material_pod_zavitem])
-   24 screw_thread(S01_prumer_vnitrni-S01_tolerance_zavit,4,55,S01_vyska_spodniho_zavitu,PI/2,2);
-   25  
-   26 //spodní valec
-   27 translate([0,0,D01_material_pod_zavitem/2])
16 translate([D02_dotahova_vzdalenost+D02_sila_materialu/2,0,0]){cube([D02_sila_materialu,D02_delka_celeho_uchytu,D02_vyska_uchytky],center=true);} 28 cylinder (h = D01_material_pod_zavitem, r=(S01_prumer_vnitrni-S01_tolerance_zavit+D01_material_pred_zavitem*2)/2, center = true, $fn=100);
17 } 29  
-   30 //uchyt na tyc
-   31 translate([0,D01_delka_tyce/2+(S01_prumer_vnitrni-S01_tolerance_zavit)/2+D01_material_pred_zavitem,D01_material_pod_zavitem/2])
-   32 cube([D01_sirka_tyce,D01_delka_tyce,D01_material_pod_zavitem],center=true);
18 33
19 //válec na odečet 34 //uchyt na tyc ovalna cast
-   35 translate([0,(S01_prumer_vnitrni-S01_tolerance_zavit)/2+D01_material_pred_zavitem,D01_material_pod_zavitem/2])
20 cylinder(h=D02_vyska_uchytky+0.01,r=D02_prumer_obruby/2,center=true); 36 cube([D01_sirka_tyce,D01_material_za_zavitem+D01_material_pred_zavitem,D01_material_pod_zavitem],center=true);
21 37
22 //kvádr na odecet 38 //material kolem uchytu na sloupek
23 translate([D02_dotahova_vzdalenost-(D02_prumer_obruby+2*D02_sila_materialu)/2,0,0]){cube([D02_prumer_obruby+2*D02_sila_materialu,D02_prumer_obruby+2*D02_sila_materialu,D02_vyska_uchytky+0.01],center=true);} 39 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])
24 40  
-   41 difference()
25 //otvory na sroub 42 {
26 translate([D02_dotahova_vzdalenost,(D02_delka_celeho_uchytu/2-D02_prumer_obruby/2-D02_sila_materialu)/2+D02_prumer_obruby/2+D02_sila_materialu,D02_vyska_uchytky/4]){rotate([0,90,0]){cylinder(h=D02_sila_materialu+0.01,r=D02_prumer_uchytneho_sroubu/2);}} 43 cube([D01_sirka_tyce,D02_sila_materialu+D02_prumer_obruby/2,D01_material_pod_zavitem],center=true);
-   44
-   45 translate([0,D02_prumer_obruby/2-D02_dotahova_vzdalenost-D02_sila_materialu,0])
-   46 cylinder(h=D02_vyska_uchytky+0.01,r=D02_prumer_obruby/2,center=true);
-   47 }
27 48
-   49 //uchyt na sloupek
28 translate([D02_dotahova_vzdalenost,(D02_delka_celeho_uchytu/2-D02_prumer_obruby/2-D02_sila_materialu)/2+D02_prumer_obruby/2+D02_sila_materialu,-D02_vyska_uchytky/4]){rotate([0,90,0]){cylinder(h=D02_sila_materialu+0.01,r=D02_prumer_uchytneho_sroubu/2);}} 50 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])
-   51 rotate(a=[0,0,270])
-   52 WINDGAUGE01A_D01_2();
-   53  
29 54 }
30 translate([D02_dotahova_vzdalenost,-((D02_delka_celeho_uchytu/2-D02_prumer_obruby/2-D02_sila_materialu)/2+D02_prumer_obruby/2+D02_sila_materialu),-D02_vyska_uchytky/4]){rotate([0,90,0]){cylinder(h=D02_sila_materialu+0.01,r=D02_prumer_uchytneho_sroubu/2);}} 55  
-   56 //otvor
-   57 translate([0,0,(D01_material_pod_zavitem+S01_vyska_spodniho_zavitu)/2])
-   58 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);
31   59  
32 translate([D02_dotahova_vzdalenost,-((D02_delka_celeho_uchytu/2-D02_prumer_obruby/2-D02_sila_materialu)/2+D02_prumer_obruby/2+D02_sila_materialu),D02_vyska_uchytky/4]){rotate([0,90,0]){cylinder(h=D02_sila_materialu+0.01,r=D02_prumer_uchytneho_sroubu/2);}} -  
33 -  
34 } 60 }
35 } 61 }
-   62
-   63 WINDGAUGE01A_D02();
36   64  
-   65  
37 //WINDGAUGE02A_D02(); 66
-   67