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