Rev 4538 Rev 4873
1 $fn=100; // model faces resolution. 1 $fn=100; // model faces resolution.
2 include <../configuration.scad> 2 include <../configuration.scad>
3 include <polyScrewThread_r1.scad> 3 include <polyScrewThread_r1.scad>
4 PI=3.141592; 4 PI=3.141592;
5   5  
6 WINDGAUGE01A_R01(); 6 WINDGAUGE01A_R01();
7   7  
8 module WINDGAUGE01A_R01() 8 module WINDGAUGE01A_R01()
9 { 9 {
10 10
11 translate([0,0,R01_zavit_vyska+1]) 11 translate([0,0,R01_zavit_vyska+1])
12 difference() 12 difference()
13 { 13 {
14 //kužel 14 //kužel
15 15
16 cylinder(h=10, r1=R03_prumer_zavitu/2+S01_sila_materialu, r2=5, center=false, $fn=100); 16 cylinder(h=4, r1=R03_prumer_zavitu/2+S01_sila_materialu, r2=5, center=false, $fn=100);
17 17
18 cylinder(h=10-2*S01_sila_materialu, r1=R03_prumer_zavitu/2, r2=5-S01_sila_materialu, center=false,$fn=100); -  
-   18
19 19
20 } 20 }
21 21
22 difference() 22 difference()
23 { 23 {
24 24
25 25
26 //válec na závit 26 //válec na závit
27 cylinder (h = R01_zavit_vyska+1, r=R03_prumer_zavitu/2+S01_sila_materialu, $fn=100); 27 cylinder (h = R01_zavit_vyska+1, r=R03_prumer_zavitu/2+S01_sila_materialu, $fn=100);
28 28
29 //odečet závitu 29 //odečet závitu
30 translate([0,0,-10]) 30 translate([0,0,-10])
31 screw_thread((R03_prumer_zavitu),S01_hloubka_zavitu,55,R01_zavit_vyska+12,PI/2,2); 31 screw_thread((R03_prumer_zavitu),S01_hloubka_zavitu,55,R01_zavit_vyska+12,PI/2,2);
32 32
33 33
34   34  
35 } 35 }
36   36  
37 //válec pro držení PCB 37 //válec pro držení PCB
38 cylinder (h = R01_zavit_vyska+10, r=2, $fn=100); 38 cylinder (h = R01_zavit_vyska+4, r=2, $fn=100);
39   39  
40 } 40 }