Rev 4465 Rev 4473
1 $fn=40; // model faces resolution. 1 $fn=40; // model faces resolution.
2 include <../configuration.scad> 2 include <../configuration.scad>
3   3  
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  
-   10 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,sirka_matky,magnet_vyska,S01_vyska_zuzene_casti,S01_vyska_prechodu)
-   11 {
-   12
-   13 //valec se zavitem
-   14 difference()
-   15 {
-   16 union()
-   17 {
-   18 screw_thread(S01_prumer_zavitu-S01_tolerance_zavit,S01_hloubka_zavitu,55,S01_vyska_komponentu_na_lozisko,PI/2,2);
-   19
-   20 translate([0,0,(S01_vyska_komponentu_na_lozisko+S01_vyska_zuzene_casti+S01_vyska_prechodu)/2])
-   21 cylinder (h = S01_vyska_komponentu_na_lozisko+S01_vyska_zuzene_casti+S01_vyska_prechodu, r=(lozisko_prumer_vnejsi+2*S01_sila_materialu)/2, center = true, $fn=100);
-   22  
-   23 }
-   24 difference()
-   25 {
-   26 translate([0,0,S01_sila_materialu+S01_vyska_komponentu_na_lozisko/2])
-   27 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);
-   28
-   29 translate([0,0,S01_sila_materialu+S01_vyska_komponentu_na_lozisko/2])
-   30 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=lozisko_prumer_vnejsi/2+S01_sila_materialu, center = true, $fn=100);
-   31
-   32 translate([-((S01_prumer_zavitu-S01_sila_materialu)-S01_tolerance_zavit)-S01_hloubka_zavitu,-S01_sila_materialu/2,0])
-   33 cube([2*((S01_prumer_zavitu-S01_sila_materialu)-S01_tolerance_zavit)-S01_hloubka_zavitu,S01_sila_materialu,S01_vyska_komponentu_na_lozisko]);
-   34
-   35 rotate ([0,0,90])
-   36 translate([-((S01_prumer_zavitu-S01_sila_materialu)-S01_tolerance_zavit)-S01_hloubka_zavitu,-S01_sila_materialu/2,0])
-   37 cube([2*((S01_prumer_zavitu-S01_sila_materialu)-S01_tolerance_zavit)-S01_hloubka_zavitu,S01_sila_materialu,S01_vyska_komponentu_na_lozisko]);
-   38
-   39
-   40 }
-   41
-   42 //otvor na pruchod hridelky
-   43 translate([0,0,S01_sila_materialu/2])
-   44 cylinder (h = S01_sila_materialu+0.01, r=(lozisko_prumer_vnejsi+0.2)/2, center = true, $fn=100);
-   45
-   46 //otvor na šroub 1
-   47 translate([-senzor_delka/2,-senzor_sirka/2,S01_vyska_komponentu_na_lozisko/2])
-   48 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(prumer_sroubu)/2, center = true, $fn=100);
-   49
-   50 //otvor na šroub 2
-   51 translate([senzor_delka/2,-senzor_sirka/2,S01_vyska_komponentu_na_lozisko/2])
-   52 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(prumer_sroubu)/2, center = true, $fn=100);
-   53
-   54 //otvor na šroub 3
-   55 translate([senzor_delka/2,senzor_sirka/2,S01_vyska_komponentu_na_lozisko/2])
-   56 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(prumer_sroubu)/2, center = true, $fn=100);
-   57  
-   58 //otvor na šroub 4
-   59 translate([-senzor_delka/2,senzor_sirka/2,S01_vyska_komponentu_na_lozisko/2])
-   60 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(prumer_sroubu)/2, center = true, $fn=100);
-   61
-   62
-   63  
-   64 //otvory na ložisko
-   65 translate([0,0,(S01_vyska_komponentu_na_lozisko+S01_vyska_zuzene_casti+S01_vyska_prechodu)/2])
-   66
-   67
-   68
-   69 cylinder (h = S01_vyska_komponentu_na_lozisko+S01_vyska_zuzene_casti+S01_vyska_prechodu+0.01, r=(lozisko_prumer_vnejsi+0.2)/2, center = true, $fn=100);
-   70
-   71
-   72  
-   73  
-   74
-   75  
-   76  
-   77  
-   78  
-   79  
-   80  
-   81  
-   82
-   83 }
-   84
-   85  
-   86 //sloupek na senzor
-   87 module SLOUPEK()
-   88 {
-   89 translate([0,0,S01_sila_materialu])
-   90 difference () {
-   91
-   92 cylinder (h = lozisko_vyska+2*S01_sila_materialu+2*S01_sila_materialu+vyska_hlavy_sroubu+magnet_vyska+vyska_matky, r= sirka_matky/2+S01_sila_materialu, $fn=20);
-   93
-   94  
-   95
-   96  
-   97 translate([0,0,lozisko_vyska+2*S01_sila_materialu+2*S01_sila_materialu+vyska_hlavy_sroubu+magnet_vyska+vyska_matky-vyska_matky])
-   98 cylinder (h = vyska_matky+0.01, r= (sirka_matky+0.2)/2, $fn=6);
-   99
-   100
-   101 translate([0,0,-0.01])
-   102 cylinder (h = lozisko_vyska+2*S01_sila_materialu+2*S01_sila_materialu+vyska_hlavy_sroubu+magnet_vyska+vyska_matky+0.01, r= (prumer_sroubu+0.2)/2, $fn=10);
-   103 }
-   104 }
-   105 }
-   106  
-   107 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,sirka_matky,magnet_vyska,S01_vyska_zuzene_casti,S01_vyska_prechodu);
-   108  
-   109  
-   110 //původní díl
-   111 /*
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,sirka_matky,magnet_vyska) 112 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,sirka_matky,magnet_vyska)
10 { 113 {
11 union() 114 union()
12 { 115 {
13 //valec se zavitem 116 //valec se zavitem
14 difference() 117 difference()
15 { 118 {
16 119
17 screw_thread(S01_prumer_zavitu-S01_tolerance_zavit,S01_hloubka_zavitu,55,S01_vyska_komponentu_na_lozisko,PI/2,2); 120 screw_thread(S01_prumer_zavitu-S01_tolerance_zavit,S01_hloubka_zavitu,55,S01_vyska_komponentu_na_lozisko,PI/2,2);
18 121
19 translate([0,0,S01_sila_materialu+S01_vyska_komponentu_na_lozisko/2]) 122 translate([0,0,S01_sila_materialu+S01_vyska_komponentu_na_lozisko/2])
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); 123 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);
21 124
22 //otvor na pruchod hridelky 125 //otvor na pruchod hridelky
23 translate([0,0,S01_sila_materialu/2]) 126 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); 127 cylinder (h = S01_sila_materialu+0.01, r=(lozisko_prumer_vnitrni+2*lozisko_prekryv+0.2)/2, center = true, $fn=100);
25 128
26 //otvor na šroub 1 129 //otvor na šroub 1
27 translate([-senzor_delka/2,-senzor_sirka/2,S01_vyska_komponentu_na_lozisko/2]) 130 translate([-senzor_delka/2,-senzor_sirka/2,S01_vyska_komponentu_na_lozisko/2])
28 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(prumer_sroubu)/2, center = true, $fn=100); 131 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(prumer_sroubu)/2, center = true, $fn=100);
29 132
30 //otvor na šroub 2 133 //otvor na šroub 2
31 translate([senzor_delka/2,-senzor_sirka/2,S01_vyska_komponentu_na_lozisko/2]) 134 translate([senzor_delka/2,-senzor_sirka/2,S01_vyska_komponentu_na_lozisko/2])
32 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(prumer_sroubu)/2, center = true, $fn=100); 135 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(prumer_sroubu)/2, center = true, $fn=100);
33 136
34 //otvor na šroub 3 137 //otvor na šroub 3
35 translate([senzor_delka/2,senzor_sirka/2,S01_vyska_komponentu_na_lozisko/2]) 138 translate([senzor_delka/2,senzor_sirka/2,S01_vyska_komponentu_na_lozisko/2])
36 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(prumer_sroubu)/2, center = true, $fn=100); 139 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(prumer_sroubu)/2, center = true, $fn=100);
37   140  
38 //otvor na šroub 4 141 //otvor na šroub 4
39 translate([-senzor_delka/2,senzor_sirka/2,S01_vyska_komponentu_na_lozisko/2]) 142 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); 143 cylinder (h = S01_vyska_komponentu_na_lozisko+0.01, r=(prumer_sroubu)/2, center = true, $fn=100);
41 144
42 } 145 }
43   146  
44 //otvory na ložisko 147 //otvory na ložisko
45 translate([0,0,lozisko_vyska/2+S01_sila_materialu]) 148 translate([0,0,lozisko_vyska/2+S01_sila_materialu])
46 difference() 149 difference()
47 { 150 {
48 151
49 cylinder (h = lozisko_vyska, r=(lozisko_prumer_vnejsi+2*S01_sila_materialu)/2, center = true, $fn=100); 152 cylinder (h = lozisko_vyska, r=(lozisko_prumer_vnejsi+2*S01_sila_materialu)/2, center = true, $fn=100);
50 cylinder (h = lozisko_vyska+0.01, r=(lozisko_prumer_vnejsi+0.2)/2, center = true, $fn=100); 153 cylinder (h = lozisko_vyska+0.01, r=(lozisko_prumer_vnejsi+0.2)/2, center = true, $fn=100);
51 154
52 155
53 } 156 }
54   157  
55 difference() 158 difference()
56 { 159 {
57 union() 160 union()
58 { 161 {
59 //uchyty na modul 162 //uchyty na modul
60 //sloupek 1 163 //sloupek 1
61 translate([-senzor_delka/2,-senzor_sirka/2,0]) 164 translate([-senzor_delka/2,-senzor_sirka/2,0])
62 SLOUPEK(); 165 SLOUPEK();
63   166  
64   167  
65 translate([senzor_delka/2,-senzor_sirka/2,0]) 168 translate([senzor_delka/2,-senzor_sirka/2,0])
66 SLOUPEK(); 169 SLOUPEK();
67   170  
68 translate([senzor_delka/2,senzor_sirka/2,0]) 171 translate([senzor_delka/2,senzor_sirka/2,0])
69 SLOUPEK(); 172 SLOUPEK();
70   173  
71 translate([-senzor_delka/2,senzor_sirka/2,0]) 174 translate([-senzor_delka/2,senzor_sirka/2,0])
72 SLOUPEK(); 175 SLOUPEK();
73 } 176 }
74 translate([0,0,S01_sila_materialu]) 177 translate([0,0,S01_sila_materialu])
75 cylinder (h = lozisko_vyska+2*S01_sila_materialu+2*S01_sila_materialu+vyska_hlavy_sroubu+magnet_vyska+vyska_matky+0.01, r=(lozisko_prumer_vnejsi+0.2)/2, $fn=100); 178 cylinder (h = lozisko_vyska+2*S01_sila_materialu+2*S01_sila_materialu+vyska_hlavy_sroubu+magnet_vyska+vyska_matky+0.01, r=(lozisko_prumer_vnejsi+0.2)/2, $fn=100);
76 179
77 } 180 }
78   181  
79   182  
80   183  
81   184  
82   185  
83   186  
84   187  
85 } 188 }
86 } 189 }
87 190
88   191  
89 //sloupek na senzor 192 //sloupek na senzor
90 module SLOUPEK() 193 module SLOUPEK()
91 { 194 {
92 translate([0,0,S01_sila_materialu]) 195 translate([0,0,S01_sila_materialu])
93 difference () { 196 difference () {
94 197
95 cylinder (h = lozisko_vyska+2*S01_sila_materialu+2*S01_sila_materialu+vyska_hlavy_sroubu+magnet_vyska+vyska_matky, r= sirka_matky/2+S01_sila_materialu, $fn=20); 198 cylinder (h = lozisko_vyska+2*S01_sila_materialu+2*S01_sila_materialu+vyska_hlavy_sroubu+magnet_vyska+vyska_matky, r= sirka_matky/2+S01_sila_materialu, $fn=20);
96 199
97   200  
98 201
99   202  
100 translate([0,0,lozisko_vyska+2*S01_sila_materialu+2*S01_sila_materialu+vyska_hlavy_sroubu+magnet_vyska+vyska_matky-vyska_matky]) 203 translate([0,0,lozisko_vyska+2*S01_sila_materialu+2*S01_sila_materialu+vyska_hlavy_sroubu+magnet_vyska+vyska_matky-vyska_matky])
101 cylinder (h = vyska_matky+0.01, r= (sirka_matky+0.2)/2, $fn=6); 204 cylinder (h = vyska_matky+0.01, r= (sirka_matky+0.2)/2, $fn=6);
102 205
103 206
104 translate([0,0,-0.01]) 207 translate([0,0,-0.01])
105 cylinder (h = lozisko_vyska+2*S01_sila_materialu+2*S01_sila_materialu+vyska_hlavy_sroubu+magnet_vyska+vyska_matky+0.01, r= (prumer_sroubu+0.2)/2, $fn=10); 208 cylinder (h = lozisko_vyska+2*S01_sila_materialu+2*S01_sila_materialu+vyska_hlavy_sroubu+magnet_vyska+vyska_matky+0.01, r= (prumer_sroubu+0.2)/2, $fn=10);
106 } 209 }
107 } 210 }
-   211 */
-   212  
-   213  
-   214  
108 215
109 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,sirka_matky,magnet_vyska); 216