Rev Author Line No. Line
4442 jacho 1 $fn=40; // model faces resolution.
2 include <../configuration.scad>
3 include <polyScrewThread_r1.scad>
4 include <AWSCREEN01A_D03.scad>
5  
6 module AWSCREEN01A_D04(D03_vyska_zavitu,D03_tolerance_zavitu,D03_material_za_zavitem,D03_polomer_zavitu,D03_polomer_stitu,D03_tloustka_materialu,D03_vyska_stitu,D03_pocet_vyztuh,screen_bevel,D04_vyska_na_elektroniku,D04_vyska_zavitu,D04_vyska_zavitu_pro_drzak_elektorniky)
7  
8 {
9 translate ([0,0,0])
10 // screen upper rim
11 translate ([0,0,D04_vyska_zavitu+D04_vyska_na_elektroniku])
12 difference () {
13 screw_thread((D03_polomer_zavitu-D03_tolerance_zavitu)*2,4,55,D03_vyska_zavitu,PI/2,2);
14  
15 cylinder (h=0.01+D03_vyska_zavitu,r = D03_polomer_zavitu-4,$fn=100);
16 }
17  
18 difference () {
19  
20 cylinder (h=D04_vyska_zavitu+D04_vyska_na_elektroniku,r = D03_polomer_zavitu + D03_material_za_zavitem,$fn=100);
21 translate ([0,0,D04_vyska_zavitu])
22 cylinder (h=0.01+D04_vyska_na_elektroniku,r = D03_polomer_zavitu-2,$fn=100);
23 translate ([0,0,-0.1])
24 screw_thread(D03_polomer_zavitu*2,4,55,D04_vyska_zavitu+4,PI/2,2);
25 }
26  
27 }
28  
29  
30 //AWSCREEN01A_D04(D03_vyska_zavitu,D03_tolerance_zavitu,D03_material_za_zavitem,D03_polomer_zavitu,D03_polomer_stitu,D03_tloustka_materialu,D03_vyska_stitu,D03_pocet_vyztuh,screen_bevel,D04_vyska_na_elektroniku,D04_vyska_zavitu,D04_vyska_zavitu_pro_drzak_elektorniky);