Rev Author Line No. Line
4536 jacho 1 $fn=40; // model faces resolution.
2 include <../configuration.scad>
3  
4  
5 include <polyScrewThread_r1.scad>
6  
7 PI=3.141592;
8  
9  
10 //Držák ložisek, rotoru, senzoru
11  
12 module WINDGAUGE01A_S01()
13 {
14 //valec se zavitem
15 union()
16 {
17 difference()
18 {
19 union()
20 {
21 translate([0,0,S01_sila_materialu])
22 screw_thread((S01_prumer_vnitrni-S01_tolerance_zavit),S01_hloubka_zavitu,55,S01_vyska_horni_zavit,PI/2,2);
23  
24 //spodní doraz
25 cylinder (h = S01_sila_materialu, r=S01_prumer_vnitrni/2+5/2*S01_sila_materialu, $fn=100);
26  
27  
28 //krycí ovál - usnadnění povolení
29 difference()
30 {
31 cylinder (h = R01_vyska_preryti_statoru+5, r=S01_prumer_vnitrni/2+5/2*S01_sila_materialu, $fn=100);
32  
33 cylinder (h = R01_vyska_preryti_statoru+5+0.01, r=S01_prumer_vnitrni/2+3/2*S01_sila_materialu, $fn=100);
34  
35 }
36 }
37  
38 //odstranění vnitřní výplně
39 translate([0,0,S01_sila_materialu])
40 cylinder (h = S01_vyska_horni_zavit+0.01, r=S01_prumer_vnitrni/2-S01_hloubka_zavitu/2-S01_sila_materialu, $fn=100);
41  
42  
43 //otvor na ložisko s vodiči
44 translate([0,0,S01_sila_materialu/2])
45 cylinder (h = S01_sila_materialu+0.01, r=(LO_spodni_prumer+0.2)/2, center = true, $fn=100);
46  
47 }
48  
49  
50  
51  
52 }
53 }
54  
55  
56 //sloupek na senzor
57 module SLOUPEK()
58 {
59 translate([0,0,S01_sila_materialu])
60 difference ()
61 {
62  
63 cylinder (h = R01_vyska_preryti_statoru+2*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);
64  
65 translate([0,0,R01_vyska_preryti_statoru+2*lozisko_vyska+2*S01_sila_materialu+2*S01_sila_materialu+vyska_hlavy_sroubu+magnet_vyska+vyska_matky-vyska_matky])
66 cylinder (h = vyska_matky+0.01, r= (sirka_matky+0.2)/2, $fn=6);
67  
68 translate([0,0,-0.01])
69 cylinder (h = R01_vyska_preryti_statoru+2*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=40);
70  
71 translate([0,0,-0.01])
72 cylinder (h = vyska_hlavy_sroubu-S01_sila_materialu, r= (prumer_hlavy_sroubu)/2, $fn=40);
73  
74 translate([0,0,vyska_hlavy_sroubu-S01_sila_materialu-0.02])
75 cylinder(h=2+0.02, r1=(prumer_hlavy_sroubu)/2, r2=(prumer_sroubu+0.2)/2);
76  
77 }
78 }
79  
80  
81  
82 WINDGAUGE01A_S01();
83