chiark / gitweb /
f3b12c538b588435b1f9ba8637d250fe7c98d416
[reprap-play.git] / osstest-arm-net-bracket.scad
1 // -*- C -*-
2
3 holedist = 64;
4 tonguewidth = 10;
5 tongue2width = 15;
6 totaldepth = 26;
7 tongue2depth = 35;
8 thick = 4;
9 tabover = 7+6;
10 tabunder = 15;
11
12 tabsidel = 7;
13 tabsider = 7+10;
14
15 tonguethick = 4;
16 tongue2thick = 5;
17 strapthick = 2;
18 strapwidth = 5;
19 ridgewidth = 2;
20
21 hstrengthick = 2.5;
22 hstrengdepth = strapwidth;
23
24 cutoutover = 7;
25 rcutoutside = 7+2 - 0.5;
26 lcutoutside = 7-6.5 - 0.5;
27
28 t2strengwidth = 10;
29
30 holedia = 3.5;
31
32 tongue2x = tongue2width - holedist;
33
34 module Tongue(tw,tt,ad,slots=2){
35   y0=thick+0.1;
36   yn=ad-ridgewidth-strapwidth;
37   difference(){
38     union(){
39       translate([-tw, 0, 0])
40         cube([tw, ad, tt+strapthick]);
41       child();
42     }
43     for (yi=[1:slots-1])
44       translate([-tw-1, y0 + (yn-y0)*yi/(slots-1), tt])
45         cube([tw+2, strapwidth, strapthick+0.05]);
46   }
47 }
48
49 module Object(){
50   difference(){
51     translate([-holedist-tabsider, 0, 0]) {
52       cube([tabsidel+tabsider+holedist, thick, tabunder+tabover]);
53       cube([tabsidel+tabsider+holedist, thick+hstrengdepth, hstrengthick]);
54     }
55     translate([0,-25,tabunder+cutoutover]) {
56       translate([-(holedist+rcutoutside), 0,0])
57         mirror([1,0,0])
58         cube([50,50,50]);
59       translate([lcutoutside, 0,0])
60         cube([50,50,50]);
61     }
62     for (x=[-holedist,0])
63       translate([x, 0, tabunder]) {
64         translate([0, -1, 0]) {
65           rotate([-90,0,0]) {
66             cylinder(r= holedia/2+0.5, h=thick+2, $fn=20);
67           }
68         }
69         translate([0, 19.95 + thick, 0])
70           cube(center=true,[10,40,10]);
71       }
72   }
73   Tongue(tonguewidth,tonguethick,totaldepth,3);
74   translate([tongue2x,0,0])
75     Tongue(tongue2width,tongue2thick,tongue2depth+thick,5) {
76     hull(){
77       translate([-(tongue2width-t2strengwidth)/2, 0,0])
78         mirror([1,0,0])
79         cube([t2strengwidth,50,20]);
80     }
81   }
82 }
83
84 Object();