Rev 4444 Rev 4462
Line 4... Line 4...
4   4  
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_S02(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,senzor_delka,senzor_sirka) 9 module WINDGAUGE02A_S02(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,senzor_delka,senzor_sirka,S01_tolerance_zavit)
10 { 10 {
-   11 union()
11   12 {
-   13 //valec se zavitem
12 difference() 14 difference()
13 { 15 {
14 //translate([0,0,-(S01_vyska_na_elektroniku+S01_vyska_zavitu_na_nasroubovani_drzaku+2*S01_vyska_komponentu_na_lozisko)/2-10]) -  
15 -  
16 //metric_thread (diameter=S01_prumer_zavitu-0.3, pitch=1, length=S01_vyska_komponentu_na_lozisko, internal=false, n_starts=6); -  
17 16
18 screw_thread(S01_prumer_zavitu-2.5,4,55,S01_vyska_komponentu_na_lozisko,PI/2,2); 17 screw_thread(S01_prumer_zavitu-S01_tolerance_zavit,S01_hloubka_zavitu,55,S01_vyska_komponentu_na_lozisko,PI/2,2);
19   -  
20 //otvory na ložisko -  
21 translate([0,0,lozisko_vyska/2]) -  
22 cylinder (h = lozisko_vyska+0.01, r=(lozisko_prumer_vnejsi+0.2)/2, center = true, $fn=100); -  
23 18
24 translate([0,0,S01_vyska_komponentu_na_lozisko/2]) 19 translate([0,0,S01_sila_materialu+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); 20 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=((S01_prumer_zavitu-S01_sila_materialu)-S01_tolerance_zavit)/2-S01_hloubka_zavitu/2, center = true, $fn=100);
26   21
-   22 //otvor na pruchod hridelky
-   23 translate([0,0,S01_sila_materialu/2])
-   24 cylinder (h = S01_sila_materialu+0.01, r=(lozisko_prumer_vnitrni+2*lozisko_prekryv+0.2)/2, center = true, $fn=100);
27   25
28 //otvor na šroub 1 26 //otvor na šroub 1
29 translate([-senzor_delka/2,-senzor_sirka/2,vyska_matky/2]) -  
30 cylinder (h = vyska_matky+0.01, r=(prumer_orechu+0.2)/2, center = true, $fn=100); -  
31 -  
32 translate([-senzor_delka/2,-senzor_sirka/2,S01_vyska_komponentu_na_lozisko/2]) 27 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); 28 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(prumer_sroubu)/2, center = true, $fn=100);
34 29
35 //otvor na šroub 2 30 //otvor na šroub 2
36 translate([senzor_delka/2,-senzor_sirka/2,vyska_matky/2]) -  
37 cylinder (h = vyska_matky+0.01, r=(prumer_orechu+0.2)/2, center = true, $fn=100); -  
38 -  
39 translate([senzor_delka/2,-senzor_sirka/2,S01_vyska_komponentu_na_lozisko/2]) 31 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); 32 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(prumer_sroubu)/2, center = true, $fn=100);
41 33
42 //otvor na šroub 3 34 //otvor na šroub 3
43 translate([senzor_delka/2,senzor_sirka/2,vyska_matky/2]) -  
44 cylinder (h = vyska_matky+0.01, r=(prumer_orechu+0.2)/2, center = true, $fn=100); -  
45 -  
46 translate([senzor_delka/2,senzor_sirka/2,S01_vyska_komponentu_na_lozisko/2]) 35 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); 36 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(prumer_sroubu)/2, center = true, $fn=100);
48   37  
49 //otvor na šroub 4 38 //otvor na šroub 4
50 translate([-senzor_delka/2,senzor_sirka/2,vyska_matky/2]) -  
51 cylinder (h = vyska_matky+0.01, r=(prumer_orechu+0.2)/2, center = true, $fn=100); -  
52 -  
53 translate([-senzor_delka/2,senzor_sirka/2,S01_vyska_komponentu_na_lozisko/2]) 39 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); 40 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(prumer_sroubu)/2, center = true, $fn=100);
55   41
56 } 42 }
-   43  
-   44 //otvory na ložisko
-   45 translate([0,0,lozisko_vyska/2+S01_sila_materialu])
-   46 difference()
-   47 {
-   48 cylinder (h = lozisko_vyska, r=(lozisko_prumer_vnejsi+2*S01_sila_materialu)/2, center = true, $fn=100);
-   49 cylinder (h = lozisko_vyska+0.01, r=(lozisko_prumer_vnejsi+0.2)/2, center = true, $fn=100);
-   50
-   51
-   52 }
-   53
-   54  
-   55  
-   56 }
-   57  
-   58  
-   59  
-   60  
-   61  
-   62  
-   63  
-   64  
-   65  
-   66  
-   67  
-   68  
-   69  
-   70  
-   71  
-   72  
-   73  
-   74  
-   75  
-   76  
-   77  
-   78  
-   79  
57 } 80 }
58 81
59   82
60   83  
61   84  
62 85  
63   86
64 87  
-   88
65 WINDGAUGE02A_S02(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,senzor_delka,senzor_sirka); 89 WINDGAUGE02A_S02(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,senzor_delka,senzor_sirka,S01_tolerance_zavit);