Rev Author Line No. Line
4279 jacho 1 $fn=40; // model faces resolution.
4297 jacho 2 //include <../configuration.scad>
4279 jacho 3  
4297 jacho 4 //kryt_rotoru(prumer_rotoru1,sila_materialu,prumer_sroubu,vyska_rotoru1);
4279 jacho 5  
4297 jacho 6 /*
7 prumer_rotoru1 - urcuje vnitrni prumer krytu
8 sila_materialu - urcuje tloustku materialu krytu
9 prumer
10 vyska_rotoru1 - urcuje vysku, kterou prekryva kryt rotor 1
11  
12 */
13  
14 module kryt_rotoru(prumer_rotoru1,sila_materialu,vyska_rotoru1)
4279 jacho 15 {
16  
17 //kopule
18 difference()
19 {
4292 jacho 20 sphere(d = prumer_rotoru1+2*sila_materialu, $fn=100);
4297 jacho 21  
4292 jacho 22 sphere(d = prumer_rotoru1+0.1, $fn=100);
4297 jacho 23  
4292 jacho 24 translate([0,0,-(prumer_rotoru1+2*sila_materialu)/2])
25 cube(size = [prumer_rotoru1+2*sila_materialu, prumer_rotoru1+2*sila_materialu, prumer_rotoru1+2*sila_materialu], center = true);
4279 jacho 26  
4297 jacho 27 }
28  
29  
4279 jacho 30  
4292 jacho 31 //válcová část krytu
4297 jacho 32 difference()
33 {
4279 jacho 34 //zakladni valec
4292 jacho 35 translate([0,0,-vyska_rotoru1/2])
36 cylinder (h = vyska_rotoru1, r=(prumer_rotoru1+2*sila_materialu)/2, center = true, $fn=100);
4279 jacho 37  
4292 jacho 38 //válec pro vykrojení
39 translate([0,0,-vyska_rotoru1/2])
40 cylinder (h = vyska_rotoru1+0.05, r=(prumer_rotoru1+0.1)/2, center = true, $fn=100);
4297 jacho 41  
42 }
4279 jacho 43 }
44  
45  
46