Rev 4436 Rev 4462
Line 4... Line 4...
4 use <zavity.scad> 4 use <zavity.scad>
5 include <polyScrewThread_r1.scad> 5 include <polyScrewThread_r1.scad>
6   6  
7 PI=3.141592; 7 PI=3.141592;
8   8  
9 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,vyska_hlavy_sroubu,prumer_hlavy_sroubu) 9 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,vyska_hlavy_sroubu,prumer_hlavy_sroubu,S01_tolerance_zavit,R02_vzdalenost_mezi_uchyty_lopatek,L01_sila_zapusteni_drzaku,L01_hloubka_zapusteni,vule_mezi_statorem_rotorem,S01_sila_materialu,S01_hloubka_zavitu)
10 { 10 {
-   11 union()
11   12 {
-   13 //valec se zavitem
12 difference() 14 difference()
13 { 15 {
-   16
14 //translate([0,0,-(S01_vyska_na_elektroniku+S01_vyska_zavitu_na_nasroubovani_drzaku+2*S01_vyska_komponentu_na_lozisko)/2-10]) 17 screw_thread((R02_vzdalenost_mezi_uchyty_lopatek+2*L01_sila_zapusteni_drzaku+2*L01_hloubka_zapusteni+2*vule_mezi_statorem_rotorem+2*S01_sila_materialu)-S01_tolerance_zavit,S01_hloubka_zavitu,55,S01_vyska_komponentu_na_lozisko,PI/2,2);
15 18
-   19 translate([0,0,S01_sila_materialu+S01_vyska_komponentu_na_lozisko/2])
16 //metric_thread (diameter=S01_prumer_zavitu-0.3, pitch=1, length=S01_vyska_komponentu_na_lozisko, internal=false, n_starts=6); 20 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=((R02_vzdalenost_mezi_uchyty_lopatek+2*L01_sila_zapusteni_drzaku+2*L01_hloubka_zapusteni+2*vule_mezi_statorem_rotorem+2*S01_sila_materialu)-S01_tolerance_zavit/2)/2-S01_hloubka_zavitu/2-S01_sila_materialu, center = true, $fn=100);
17 21
-   22 //otvor na pruchod hridelky
-   23 translate([0,0,S01_sila_materialu/2])
18 screw_thread(S01_prumer_zavitu-0.5,4,55,S01_vyska_komponentu_na_lozisko,PI/2,2); 24 cylinder (h = S01_sila_materialu+0.01, r=(lozisko_prumer_vnitrni+2*lozisko_prekryv+0.2)/2, center = true, $fn=100);
-   25 }
19   26  
20 //otvory na ložisko 27 //otvory na ložisko
21 translate([0,0,lozisko_vyska/2]) 28 translate([0,0,lozisko_vyska/2+S01_sila_materialu])
-   29 difference()
-   30 {
-   31 cylinder (h = lozisko_vyska, r=(lozisko_prumer_vnejsi+2*S01_sila_materialu)/2, center = true, $fn=100);
22 cylinder (h = lozisko_vyska+0.01, r=(lozisko_prumer_vnejsi+0.2)/2, center = true, $fn=100); 32 cylinder (h = lozisko_vyska+0.01, r=(lozisko_prumer_vnejsi+0.2)/2, center = true, $fn=100);
23 33
24 translate([0,0,S01_vyska_komponentu_na_lozisko/2]) -  
25 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(lozisko_prumer_vnitrni+2*lozisko_prekryv+0.2)/2, center = true, $fn=100); -  
26   -  
27   -  
28 //otvor na šroub 1 -  
29 translate([-senzor_delka/2,-senzor_sirka/2,vyska_hlavy_sroubu/2]) -  
30 cylinder (h = vyska_hlavy_sroubu+0.01, r=(prumer_hlavy_sroubu+0.2)/2, center = true, $fn=100); -  
31 -  
32 translate([-senzor_delka/2,-senzor_sirka/2,S01_vyska_komponentu_na_lozisko/2]) -  
33 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(prumer_sroubu)/2, center = true, $fn=100); -  
34 -  
35 //otvor na šroub 2 -  
36 translate([senzor_delka/2,-senzor_sirka/2,vyska_hlavy_sroubu/2]) -  
37 cylinder (h = vyska_hlavy_sroubu+0.01, r=(prumer_hlavy_sroubu+0.2)/2, center = true, $fn=100); -  
38 -  
39 translate([senzor_delka/2,-senzor_sirka/2,S01_vyska_komponentu_na_lozisko/2]) -  
40 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(prumer_sroubu)/2, center = true, $fn=100); -  
41 -  
42 //otvor na šroub 3 -  
43 translate([senzor_delka/2,senzor_sirka/2,vyska_hlavy_sroubu/2]) -  
44 cylinder (h = vyska_hlavy_sroubu+0.01, r=(prumer_hlavy_sroubu+0.2)/2, center = true, $fn=100); -  
45 -  
46 translate([senzor_delka/2,senzor_sirka/2,S01_vyska_komponentu_na_lozisko/2]) -  
47 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(prumer_sroubu)/2, center = true, $fn=100); -  
48   -  
49 //otvor na šroub 4 -  
50 translate([-senzor_delka/2,senzor_sirka/2,vyska_hlavy_sroubu/2]) -  
51 cylinder (h = vyska_hlavy_sroubu+0.01, r=(prumer_hlavy_sroubu+0.2)/2, center = true, $fn=100); -  
52 34
53 translate([-senzor_delka/2,senzor_sirka/2,S01_vyska_komponentu_na_lozisko/2]) -  
54 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(prumer_sroubu)/2, center = true, $fn=100); -  
55   35 }
56 } 36
57 } 37 }
58 38 }
59   -  
60   39  
61   40  
62 41
63   42  
64 43
65 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,vyska_hlavy_sroubu,prumer_hlavy_sroubu); 44 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,vyska_hlavy_sroubu,prumer_hlavy_sroubu,S01_tolerance_zavit,R02_vzdalenost_mezi_uchyty_lopatek,L01_sila_zapusteni_drzaku,L01_hloubka_zapusteni,vule_mezi_statorem_rotorem,S01_sila_materialu,S01_hloubka_zavitu);