10 mainframeendthick = 2.5;
16 boltholedia = 6.5 + 0.5;
17 boltholeslotshorter = 6;
18 mainframeholedia = 5 + 0.5;
20 // "slot" refers to the things in the base of the drill press stand
21 backslotedgespace = 55;
23 backslotmid2screwhole = 17;
25 slotplugshorterlen = 8;
26 slotpluglongerlen = 18;
28 slotslope = 11.0 / 18.5;
30 // "keepslot" refers to the screws in the wooden jig block
33 keepslotx = backslotedgespace / 2;
36 mainframeextraside = 15;
37 mainframeextrafront = 15;
39 rearwallstrengthwidth = 10;
44 slotslopediag = sqrt(1 + slotslope*slotslope);
45 slotwidthx = slotwidth * slotslopediag;
47 slotxperlen = slotslope / slotslopediag;
48 slotyperlen = 1 / slotslopediag;
50 mainframeholex = backslotedgespace/2 + slotwidth/sqrt(2) +
51 backslotmid2screwhole / sqrt(2);
53 mainframeholey = -backslotmid2screwhole / sqrt(2);
55 mainframemaxx = mainframeholex + mainframeextraside;
56 mainframeminy = mainframeholey - mainframeextrafront;
57 mainframemaxz = keepslotstartz + keepslotlen;
62 translate([-1, mainframeminy, 0])
63 cube([mainframemaxx+1, -mainframeminy, basethick]);
64 translate([-1, -rearwallthick, 0])
65 cube([mainframemaxx+1, rearwallthick, mainframemaxz]);
67 for (x=[keepslotx - keepslotclear, mainframemaxx - 0.5]) {
70 linear_extrude(height=mainframeendthick)
71 polygon([[-mainframeminy, 0],
76 translate([backslotedgespace/2, 0, 1])
78 linear_extrude(height=slotplugheight+1)
81 [slotwidthx + slotplugshorterlen * slotxperlen,
82 -slotplugshorterlen * slotyperlen],
83 [slotpluglongerlen * slotxperlen,
84 -slotpluglongerlen * slotyperlen]]);
86 -rearwallthick - boltholeslotshorter + 0.2,
87 tubedia + tubetubetopslop + tubetubethick + 4])
88 cube([keepslotx - keepslotclear + 1,
89 boltholeslotshorter + 0.5,
90 rearwallstrengthwidth]);
95 module TubeThing(extralen, dia, extraheight, underheight){
96 effheight = tubetubetopslop + extraheight + underheight;
97 len = -mainframeminy + extralen * 2;
98 translate([0, mainframeminy - extralen, -underheight]) {
99 translate([0,0, dia/2 + effheight])
100 rotate([-90,0,0]) cylinder(h=len, r=dia/2);
101 translate([-dia/2, 0, 0])
102 cube([dia, len, effheight + dia/2]);
110 TubeThing(0, tubedia+tubetubethick*2, -tubetubethick, 0);
113 translate([0,0,-0.1])
114 TubeThing(10, tubedia, 0, 5);
115 translate([-boltholedia/2, mainframeminy - 1, -5])
117 -mainframeminy + 1 - rearwallthick - boltholeslotshorter,
118 mainframemaxz + 10]);
121 translate([mainframeholex, mainframeholey, -30])
122 cylinder(h=basethick+40, r=mainframeholedia/2);
123 translate([keepslotx - keepslotwidth/2,
124 -10, keepslotstartz])
125 cube([keepslotwidth, 20, keepslotlen + 10]);
133 //TubeThing(0, tubedia);