chiark / gitweb /
dovecliptest wip
[reprap-play.git] / dovecliptest.scad
1 toothheight = 1.2;
2 webthick = 1.8;
3 height = 7;
4 pindepth = 10;
5 nomrad = height/2 - toothheight;
6 minrad = nomrad - 0.5;
7 maxrad = nomrad + 0.5;
8
9 webgap = 0.4;
10
11 toothgap = webthick + webgap*2;
12
13 module DoveClipPin() {
14   intersection(){
15     union(){
16       for (m=[0,1]) {
17         mirror([0,0,m]) translate([0,0,height/2]) rotate([90,0,0])
18           cylinder($fn=20, r1=minrad, r2=maxrad, h=pindepth);
19       }
20       translate([-webthick/2, -pindepth, -height/2-1])
21         cube([webthick, pindepth, height+2]);
22     }
23     translate([-maxrad-1, -pindepth-1, -height/2])
24       cube([maxrad*2+2, pindepth+2, height]);
25   }
26 }
27
28 module DoveClipEnd(baseextend=1, height=7) {
29   basethick = toothheight;
30   jawthick = toothheight;
31   cubex = nomrad*2 + jawthick*2;
32   cube0y = -basethick-nomrad*2-toothheight;
33   centrey = -basethick-nomrad;
34   difference(){
35     translate([-cubex/2, cube0y, 0])
36       cube([cubex, -cube0y+baseextend, height]);
37     translate([0, centrey, -1])
38       cylinder($fn=20, r=nomrad, h=height+2);
39     translate([-toothgap/2, cube0y-1, -1])
40       cube([toothgap, toothheight+nomrad+1, height+2]);
41   }
42 }
43
44 for (x=[0,8])
45   translate([x,0,0]) DoveClipEnd();
46 translate([-4,0,0])
47   cube([16,5,7]);
48
49 //DoveClipPin();
50
51 //translate([-10,
52 //cube([