Rev 4431 Rev 4440
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 use <zavity.scad> 4 include <WINDGAUGE02A_D02.scad>
-   5 include <polyScrewThread_r1.scad>
5   6  
6 module WINDGAUGE02A_S03(S01_sila_materialu,S01_vyska_komponentu_na_lozisko,S01_prumer_zavitu,lozisko_vyska,lozisko_prumer_vnejsi,lozisko_prumer_vnitrni,lozisko_prekryv,vyska_matky,prumer_orechu,prumer_sroubu) -  
7 { 7 PI=3.141592;
8   8  
9 difference() -  
10 { -  
11 //translate([0,0,-(S01_vyska_na_elektroniku+S01_vyska_zavitu_na_nasroubovani_drzaku+2*S01_vyska_komponentu_na_lozisko)/2-10]) -  
12 -  
13 metric_thread (diameter=S01_prumer_zavitu-0.3, pitch=1, length=S01_vyska_komponentu_na_lozisko, internal=false, n_starts=6); -  
14   9  
15 //otvory na ložisko -  
16 translate([0,0,lozisko_vyska/2]) -  
17 cylinder (h = lozisko_vyska+0.01, r=(lozisko_prumer_vnejsi+0.2)/2, center = true, $fn=100); -  
18 -  
19 translate([0,0,S01_vyska_komponentu_na_lozisko/2]) -  
20 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(lozisko_prumer_vnitrni+2*lozisko_prekryv+0.2)/2, center = true, $fn=100); -  
21   10  
-   11 module WINDGAUGE02A_D01(S01_vyska_komponentu_na_lozisko,S01_prumer_zavitu,D01_material_pod_zavitem,D01_material_za_zavitem,D01_material_pred_zavitem,D01_delka_tyce,D01_sirka_tyce,D02_sila_materialu,D02_vyska_uchytky,D02_prumer_obruby,D02_delka_celeho_uchytu,D02_dotahova_vzdalenost,D02_prumer_uchytneho_sroubu)
-   12 {
22   13  
23 //otvor na šroub 1 14 difference()
24 translate([-20,0,vyska_hlavy_sroubu/2]) -  
25 cylinder (h = vyska_hlavy_sroubu+0.01, r=(prumer_hlavy_sroubu+0.2)/2, center = true, $fn=100); -  
26 15 {
27 translate([-20,0,S01_vyska_komponentu_na_lozisko/2]) -  
28 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(prumer_sroubu)/2, center = true, $fn=100); -  
29   16  
-   17 union()
-   18 {
-   19 //zavit
-   20 translate([0,0,D01_material_pod_zavitem])
-   21 screw_thread(S01_prumer_zavitu-0.5,4,55,S01_vyska_komponentu_na_lozisko,PI/2,2);
-   22  
30 //otvor na šroub 2 23 //spodní valec
31 translate([20,0,vyska_hlavy_sroubu/2]) 24 translate([0,0,D01_material_pod_zavitem/2])
32 cylinder (h = vyska_hlavy_sroubu+0.01, r=(prumer_hlavy_sroubu+0.2)/2, center = true, $fn=100); 25 cylinder (h = D01_material_pod_zavitem, r=(S01_prumer_zavitu+D01_material_pred_zavitem*2)/2, center = true, $fn=100);
-   26  
-   27 //uchyt na tyc
-   28 translate([0,D01_delka_tyce/2+S01_prumer_zavitu/2+D01_material_pred_zavitem,D01_material_pod_zavitem/2])
-   29 cube([D01_sirka_tyce,D01_delka_tyce,D01_material_pod_zavitem],center=true);
-   30 //uchyt na tyc ovalna cast
-   31 translate([0,S01_prumer_zavitu/2+D01_material_pred_zavitem,D01_material_pod_zavitem/2])
-   32 cube([D01_sirka_tyce,D01_material_za_zavitem+D01_material_pred_zavitem,D01_material_pod_zavitem],center=true);
-   33
-   34
-   35 //material kolem uchytu na sloupek
-   36 translate([0,D01_delka_tyce+S01_prumer_zavitu/2+D01_material_pred_zavitem+(D02_sila_materialu+D02_prumer_obruby/2)/2-D02_dotahova_vzdalenost,D01_material_pod_zavitem/2])
-   37 difference()
-   38 {
-   39 cube([D01_sirka_tyce,D02_sila_materialu+D02_prumer_obruby/2,D01_material_pod_zavitem],center=true);
-   40 translate([0,D02_prumer_obruby/2-D02_dotahova_vzdalenost-D02_sila_materialu,0])
-   41 cylinder(h=D02_vyska_uchytky+0.01,r=D02_prumer_obruby/2,center=true);
-   42
-   43 }
-   44
-   45  
-   46  
-   47 //uchyt na sloupek
-   48
-   49 translate([0,D01_delka_tyce+S01_prumer_zavitu/2+D01_material_pred_zavitem+D02_sila_materialu+(D02_prumer_obruby)/2,D02_vyska_uchytky/2])
-   50 rotate(a=[0,0,270])
-   51 WINDGAUGE02A_D02(D02_sila_materialu,D02_vyska_uchytky,D02_prumer_obruby,D02_delka_celeho_uchytu,D02_dotahova_vzdalenost,D02_prumer_uchytneho_sroubu);
-   52  
33 53 }
-   54  
-   55 //otvor
34 translate([20,0,S01_vyska_komponentu_na_lozisko/2]) 56 translate([0,0,(D01_material_pod_zavitem+S01_vyska_komponentu_na_lozisko)/2])
35 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(prumer_sroubu)/2, center = true, $fn=100); 57 cylinder (h = D01_material_pod_zavitem+S01_vyska_komponentu_na_lozisko+0.02, r=(S01_prumer_zavitu-2*D01_material_za_zavitem)/2, center = true, $fn=100);
36   58  
37 } 59 }
38 } 60 }
39 61
-   62 WINDGAUGE02A_D01(S01_vyska_komponentu_na_lozisko,S01_prumer_zavitu,D01_material_pod_zavitem,D01_material_za_zavitem,D01_material_pred_zavitem,D01_delka_tyce,D01_sirka_tyce,D02_sila_materialu,D02_vyska_uchytky,D02_prumer_obruby,D02_delka_celeho_uchytu,D02_dotahova_vzdalenost,D02_prumer_uchytneho_sroubu);
40   63  
41   64  
42 module stator3(stator3_vyska,prumer_rotoru1,lozisko_vyska,sila_pod_loziskem,sila_materialu,vule1,stator3_sila_steny, -  
43 stator3_vyska_prekryti,prumer_hlavy_sroubu,stator3_vzdalenost_od_steny,lozisko_vyska,prumer_sroubu,roztec_sroubu,uchyt_prumer_sroubu,vyska_stator4,kabel_prumer) -  
44 { -  
45 difference() -  
46 { -  
47 cylinder (h = stator3_vyska, r=(prumer_rotoru1)/2, center = true, $fn=100); -  
48 -  
49 translate([0,0,(stator3_vyska-lozisko_vyska-sila_pod_loziskem)/2]) -  
50 cylinder (h = lozisko_vyska+sila_pod_loziskem+0.1, r=(prumer_rotoru1-2*sila_materialu-2*vule1-stator3_sila_steny)/2, center = true, $fn=100); -  
51   -  
52 cylinder (h = stator3_vyska+0.1, r=(prumer_rotoru1-2*sila_materialu-2*vule1-2*stator3_sila_steny-1)/2, center = true, $fn=100); -  
53 -  
54 -  
55 translate([0,0,(stator3_vyska-stator3_vyska_prekryti)/2]) -  
56 difference() -  
57 { -  
58 -  
59 cylinder (h = stator3_vyska_prekryti+0.1, r=(prumer_rotoru1+0.1)/2, center = true, $fn=100); -  
60 -  
61 cylinder (h = stator3_vyska_prekryti+0.1, r=(prumer_rotoru1-2*sila_materialu-2*vule1)/2, center = true, $fn=100); -  
62 -  
63 } -  
64 -  
65 //otvory pro uchyceni stator 3 -  
66 //otvor pro sroub 1 -  
67 translate([0,(prumer_rotoru1-2*sila_materialu-2*vule1-2*stator3_sila_steny-prumer_hlavy_sroubu-2*stator3_vzdalenost_od_steny)/2,0]) -  
68 cylinder (h = lozisko_vyska+sila_pod_loziskem+0.1, r=prumer_sroubu/2, center = true, $fn=100); -  
69   -  
70 translate([0,(prumer_rotoru1-2*sila_materialu-2*vule1-2*stator3_sila_steny-prumer_hlavy_sroubu-2*stator3_vzdalenost_od_steny)/2,2]) -  
71 cylinder (h = lozisko_vyska+sila_pod_loziskem+0.1, r=prumer_hlavy_sroubu/2, center = true, $fn=100); -  
72   -  
73 //otvor pro sroub 2 -  
74 translate([0,-(prumer_rotoru1-2*sila_materialu-2*vule1-2*stator3_sila_steny-prumer_hlavy_sroubu-2*stator3_vzdalenost_od_steny)/2,0]) -  
75 cylinder (h = lozisko_vyska+sila_pod_loziskem+0.1, r=prumer_sroubu/2, center = true, $fn=100); -  
76   -  
77 translate([0,-(prumer_rotoru1-2*sila_materialu-2*vule1-2*stator3_sila_steny-prumer_hlavy_sroubu-2*stator3_vzdalenost_od_steny)/2,2]) -  
78 cylinder (h = lozisko_vyska+sila_pod_loziskem+0.1, r=prumer_hlavy_sroubu/2, center = true, $fn=100); -  
79 } -  
80   -  
81   -  
82 //dno stator3 -  
83   -  
84 translate([0,0,-(stator3_vyska-stator3_sila_steny)/2]) -  
85 difference() -  
86 { -  
87 cylinder (h = stator3_sila_steny, r=(prumer_rotoru1)/2, center = true, $fn=100); -  
88 -  
89 //otvory pro uchyceni stator 3 -  
90 //otvor pro sroub 1 -  
91 translate([0,(prumer_rotoru1-2*sila_materialu-2*vule1-2*stator3_sila_steny-prumer_hlavy_sroubu-2*stator3_vzdalenost_od_steny)/2,0]) -  
92 cylinder (h = stator3_sila_steny+0.1, r=prumer_sroubu/2, center = true, $fn=100); -  
93   -  
94 -  
95   -  
96 //otvor pro sroub 2 -  
97 translate([0,-(prumer_rotoru1-2*sila_materialu-2*vule1-2*stator3_sila_steny-prumer_hlavy_sroubu-2*stator3_vzdalenost_od_steny)/2,0]) -  
98 cylinder (h = stator3_sila_steny+0.1, r=prumer_sroubu/2, center = true, $fn=100); -  
99 -  
100 //srouby pro uchycení anemometru -  
101 translate([roztec_sroubu/2,roztec_sroubu/2,0]) -  
102 cylinder (h = stator3_sila_steny+0.1, r=uchyt_prumer_sroubu/2, center = true, $fn=100); -  
103 -  
104 translate([-roztec_sroubu/2,roztec_sroubu/2,0]) -  
105 cylinder (h = stator3_sila_steny+0.1, r=uchyt_prumer_sroubu/2, center = true, $fn=100); -  
106   -  
107 translate([roztec_sroubu/2,-roztec_sroubu/2,0]) -  
108 cylinder (h = stator3_sila_steny+0.1, r=uchyt_prumer_sroubu/2, center = true, $fn=100); -  
109 -  
110 translate([-roztec_sroubu/2,-roztec_sroubu/2,0]) -  
111 cylinder (h = stator3_sila_steny+0.1, r=uchyt_prumer_sroubu/2, center = true, $fn=100); -  
112 -  
113 //dira na kabel -  
114 cylinder (h = vyska_stator4+0.1, r=(kabel_prumer/2+0.1), center = true, $fn=100); -  
115 } -  
116 } -  
117 -  
118   -  
119 65
120 WINDGAUGE02A_S03(S01_sila_materialu,S01_vyska_komponentu_na_lozisko,S01_prumer_zavitu,lozisko_vyska,lozisko_prumer_vnejsi,lozisko_prumer_vnitrni,lozisko_prekryv,vyska_matky,prumer_orechu,prumer_sroubu); -  
-   66