martin/swimtracker-firmware
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

case design

Browse Source
This commit is contained in:
Martin Bauer
2021-05-15 12:19:44 +02:00
parent 27eea7dd1c
commit 06fdda1d93
69 changed files with 112975 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

472
hardware/case/BOLTS_OpenSCAD_0.3_gpl3/base/aluminiumProfiles.scad Normal file
View File

@@ -0,0 +1,472 @@
// Modules for the Bosch Rexroth series of aluminium profiles
// Sourced from http://www.kjnltd.co.uk/
// Author - Damian Axford
// Public Domain
eta = 0.01;
// Bore Types
BR_20x20_Bore = [5.5, 1.5, 7];
function aluProBore_r(boreType) = boreType[0]/2;
function aluProBore_outsetW(boreType) = boreType[1];
function aluProBore_outsetR(boreType) = boreType[2]/2;
// Core Types
BR_20x20_Core = [9,2,0.75];
function aluProCore_w(coreType) = coreType[0];
function aluProCore_keyW(coreType) = coreType[1];
function aluProCore_keyD(coreType) = coreType[2];
//Corner Types
BR_20x20_Corner = [20, 7, 1.5, 0.5, 4];
// Side Types - for closed slots
BR_20x20_Side = [20, 1.5];
// Side Styles
BR_0 = [0,0,0,0];
BR_1S = [0,1,1,1];
BR_2S = [0,1,0,1];
BR_3S = [0,1,0,0];
BR_2SA = [1,1,0,0];
// Profiles - combination of elements
BR_20x20 = [BR_20x20_Bore, BR_20x20_Core, BR_20x20_Corner, BR_20x20_Side, BR_0, 1, 1, "BR_20x20"];
BR_20x20_1S = [BR_20x20_Bore, BR_20x20_Core, BR_20x20_Corner, BR_20x20_Side, BR_1S, 1, 1, "BR_20x20_1S"];
BR_20x20_2S = [BR_20x20_Bore, BR_20x20_Core, BR_20x20_Corner, BR_20x20_Side, BR_2S, 1, 1, "BR_20x20_2S"];
BR_20x20_3S = [BR_20x20_Bore, BR_20x20_Core, BR_20x20_Corner, BR_20x20_Side, BR_3S, 1, 1, "BR_20x20_3S"];
BR_20x20_2SA = [BR_20x20_Bore, BR_20x20_Core, BR_20x20_Corner, BR_20x20_Side, BR_2SA, 1, 1, "BR_20x20_2SA"];
BR_20x40 = [BR_20x20_Bore, BR_20x20_Core, BR_20x20_Corner, BR_20x20_Side, BR_0, 1, 2, "BR_20x40"];
BR_20x60 = [BR_20x20_Bore, BR_20x20_Core, BR_20x20_Corner, BR_20x20_Side, BR_0, 1, 3, "BR_20x60"];
BR_20x80 = [BR_20x20_Bore, BR_20x20_Core, BR_20x20_Corner, BR_20x20_Side, BR_0, 1, 4, "BR_20x80"];
function aluPro_label(type) = type[7];
//twistLockNutType
BR_20x20_TwistLockNut = [5.8,11.3,4,0.8,1.5];
// gussets
// width, wall_thickness, slot width, slot height, slot offset from base, nib depth
BR_20x20_Gusset = [18, 3, 4.5, 7, 7.7, 1, "BR20x20Gusset"];
module aluProBore(boreType, $fn=16) {
union() {
circle(r=aluProBore_r(boreType));
intersection() {
circle(r=aluProBore_outsetR(boreType));
for (i=[0:3])
rotate([0,0,i*90 + 45])
square([aluProBore_outsetR(boreType)*2,aluProBore_outsetW(boreType)], center=true);
}
}
}
module aluProCore(coreType) {
w = aluProCore_w(coreType);
keyW = aluProCore_keyW(coreType);
keyD = aluProCore_keyD(coreType);
difference() {
square([w,w],center=true);
// remove keys
for (i=[0:3])
rotate([0,0,i*90])
translate([w/2,0,0])
polygon([[eta,keyW/2],
[-keyD,0],
[eta,-keyW/2]]);
}
}
module aluProCorner(cornerType, $fn=8) {
// xy corner
w1 = cornerType[0];
w2 = cornerType[1];
t = cornerType[2];
cham = cornerType[3];
w3 = cornerType[4];
union() {
// radial arm
rotate([0,0,45]) translate([0,-t/2,0]) square([w1/2+t,t]);
// outer radius
translate([w1/2-t,w1/2-t,0]) circle(r=t);
// corner block
translate([w1/2-w3,w1/2-w3]) square([w3-t+eta,w3-t+eta]);
// returns
for (i=[0,1]) mirror([i,i,0]) {
translate([w1/2-w2,w1/2-t,0]) square([w2-t,t-cham]);
translate([w1/2-w2+cham,w1/2-cham-eta,0]) square([w2-t-cham,cham+eta]);
}
}
}
module aluProSide(sideType) {
// x side
w = sideType[0];
t = sideType[1];
translate([w/2-t-eta,-w/4,0]) square([t+eta,w/2]);
}
module aluProHollow(cornerType) {
// x hollow
w1 = cornerType[0];
t = cornerType[2];
w3 = cornerType[4];
translate([w1/2,0]) square([2*w3 - 2*t, w1 - 2*t],center=true);
}
// TSlot - to be unioned onto a printed part for engaging tightly with the aluprofile
// same centre and orientation as a full profile section, x+ side
// protrudes eta beyond external boundary of section to allow for union
// requires linear_extrude'ing
module aluProTSlot(profileType, $fn=8) {
//BR_20x20_Corner = [20, 7, 1.5, 0.5, 4];
//BR_20x20_Core = [9,2,0.75];
coreType = profileType[1];
cornerType = profileType[2];
w1 = cornerType[0];
w2 = cornerType[1];
t = cornerType[2];
cham = cornerType[3];
w3 = cornerType[4];
tol = 0.5; // mm tolerance, total per gap
slotW = w1- 2*w2 - tol;
slotD = (w1 - coreType[0]) / 2 - tol;
slotOffset = coreType[0]/2 + tol;
wingW = w1 - 2*w3 - 4*tol;
wingInset = t + tol/2;
union() {
// central block
translate([slotOffset,-slotW/2,0]) square([slotD+eta, slotW]);
// wings
for (i=[0,1]) mirror([0,i,0]) {
polygon(points=[[slotOffset,slotW/2],[w1/2-w3/2-tol,wingW/2],[w1/2-wingInset,wingW/2],[w1/2-wingInset, slotW/2]], paths=[[0,1,2,3]]);
}
}
}
// TSlotLug - to be unioned onto a printed part for engaging tightly with the aluprofile slot
// same centre and orientation as a full profile section, x+ side
// protrudes eta beyond external boundary of section to allow for union
// NB: solid part
module aluProTSlotLug(profileType, l=5, $fn=8) {
//BR_20x20_Corner = [20, 7, 1.5, 0.5, 4];
//BR_20x20_Core = [9,2,0.75];
coreType = profileType[1];
cornerType = profileType[2];
w1 = cornerType[0];
w2 = cornerType[1];
t = cornerType[2];
cham = cornerType[3];
w3 = cornerType[4];
tol = 0.5; // mm tolerance, total per gap
slotW = w1- 2*w2 - tol;
slotD = (w1 - coreType[0]) / 2 - tol;
slotD2 = l < slotD ? l : slotD;
slotOffset = coreType[0]/2 + tol;
wingW = w1 - 2*w3 - 4*tol;
wingInset = t + tol/2;
union() {
// central block
translate([slotOffset,-slotW/2,0]) square([slotD2+eta, slotW]);
}
}
module aluProBasicSection(profileType) {
difference() {
union() {
aluProCore(profileType[1]);
for (i=[0:3]) rotate([0,0,i*90]) {
aluProCorner(profileType[2]);
if (profileType[4][i] == 1)
aluProSide(profileType[3]);
}
}
aluProBore(profileType[0]);
}
}
module aluProSection(profileType,detailed) {
x = profileType[5];
y = profileType[6];
w = profileType[3][0];
sx = -(x-1)*w/2;
sy = -(y-1)*w/2;
w1 = profileType[2][0];
if (!detailed) {
// simple rectangle
square([w1 * x,w1 * y],center=true);
} else {
difference() {
union() {
for (i=[0:x-1])
for (j=[0:y-1])
translate([sx + w * i, sy + w * j,0]) aluProBasicSection(profileType);
// fill-in sides
if (y > 1)
for (i=[0:y-2])
for (j=[0,1])
mirror([j,0,0])
translate([sx + (x-1) * w/2, sy + i*w + w/2,0])
aluProSide(profileType[3]);
}
// remove hollows
if (y > 1)
for (i=[0:y-2])
for (j=[0,1])
mirror([j,0,0])
translate([sx + (x-1) * w/2, sy + i*w,0])
rotate([0,0,90]) aluProHollow(profileType[2]);
}
}
}
module aluProExtrusion(profileType, l, detailed) {
render()
translate([0,0,center?-l/2:0])
linear_extrude(height=l)
aluProSection(profileType, detailed=detailed);
}
// utility functions to generate common profiles with gussets
// set gusset array values to 1 to indicate where a gusset should be present
// numbering is anticlockwise from y+
module BR20x20WG(l=100, startGussets=[0,0,0,0], endGussets=[0,0,0,0], screws=true) {
gussetType=BR_20x20_Gusset;
profileType = BR_20x20;
aluProExtrusion(profileType, l);
// gussets
for (i=[0:3]) {
//start
if (startGussets[i]==1)
rotate([0,0,i*90])
translate([0,10,0])
aluProGusset(gussetType, screws=screws);
//end
if (endGussets[i]==1)
rotate([0,0,i*90])
translate([0,10,l])
mirror([0,0,1])
aluProGusset(gussetType, screws=screws);
}
}
// same as above, but between points
module BR20x20WGBP(p1,p2,roll=0,startGussets=[0,0,0,0], endGussets=[0,0,0,0], screws=true) {
v = subv(p2,p1);
l = mod(v);
translate(p1) orientate(v,roll=roll) BR20x20WG(l, startGussets, endGussets, screws);
}
// for 20x40... gusset numbering is from y+ anticlockwise
module BR20x40WG(l=100, startGussets=[0,0,0,0,0,0], endGussets=[0,0,0,0,0,0], screws=true) {
gussetType=BR_20x20_Gusset;
profileType = BR_20x40;
aluProExtrusion(profileType, l);
// gussets
for (i=[0,1]) {
//y+
if (i==0?startGussets[0]==1:endGussets[0]==1)
translate([0,20,i==0?0:l])
rotate([0,0,0])
mirror([0,0,i])
aluProGusset(gussetType, screws=screws);
//y-
if (i==0?startGussets[3]==1:endGussets[3]==1)
translate([0,-20,i==0?0:l])
rotate([0,0,180])
mirror([0,0,i])
aluProGusset(gussetType, screws=screws);
// x-
for (j=[0,1])
if (i==0?startGussets[1+j]==1:endGussets[1+j]==1)
translate([-10,10-j*20,i==0?0:l])
rotate([0,0,90])
mirror([0,0,i])
aluProGusset(gussetType, screws=screws);
// x+
for (j=[0,1])
if (i==0?startGussets[4+j]==1:endGussets[4+j]==1)
translate([10,-10+j*20,i==0?0:l])
rotate([0,0,270])
mirror([0,0,i])
aluProGusset(gussetType, screws=screws);
}
}
// same as above, but between points
module BR20x40WGBP(p1,p2,roll=0,startGussets=[0,0,0,0,0,0], endGussets=[0,0,0,0,0,0], screws=true) {
v = subv(p2,p1);
l = mod(v);
translate(p1) orientate(v,roll=roll) BR20x40WG(l, startGussets, endGussets, screws);
}
module aluProExtrusionBetweenPoints(p1,p2,profileType=BR_20x20,roll=0) {
v = subv(p2,p1);
l = mod(v);
translate(p1) orientate(v,roll=roll) aluProExtrusion(profileType, l);
}
// width, wall_thickness, slot width, slot height, slot offset from base, nib depth
//BR_20x20_Gusset = [18, 3, 4.5, 7, 7.7, 1];
module aluProGusset(tg,screws=false) {
// sits on z=0
// faces along y+ and z+
w = tg[0];
t = tg[1];
slotw = tg[2];
sloth = tg[3];
sloto = tg[4];
nib = tg[5];
vitamin(str(tg[6],": ",tg[6]));
color(grey80)
render()
union() {
// ends
for (i=[0,1])
mirror([0,-i,i])
linear_extrude(t) {
difference() {
translate([-w/2,0,0]) square([w,w]);
translate([(-w/2+slotw)/2,sloto,0]) square([slotw,sloth]);
}
}
// nibs - must add these at some point!
//sides
for (i=[0,1])
mirror([i,0,0])
translate([w/2-t/2,t,t])
rotate([0,-90,0])
right_triangle(width=w-t, height=w-t, h=t, center = true);
}
if (screws) {
for (i=[0,1])
mirror([0,-i,i]) {
translate([0,12,t]) screw(M4_cap_screw,8);
translate([0,12,0]) aluProTwistLockNut(BR_20x20_TwistLockNut);
}
}
}
//BR_20x20_TwistLockNut = [5.8,11.3,4,0.8,1.5];
// aligned such that the origin is level with the surface of the profile when the nut is locked
module aluProTwistLockNut(tlnt) {
vitamin(str("AluExtTwistNut: Aluminium Extrusion Twist Nut"));
if (simplify) {
color("silver")
render()
translate([0,0,-tlnt[2] -tlnt[3] - (tlnt[4] - tlnt[3])])
translate([0,0,(tlnt[2]-1)/2]) rotate([90,0,0]) trapezoidPrism(tlnt[1],tlnt[0],tlnt[2]-1,-(tlnt[1] - tlnt[0])/2,tlnt[0],center=true);
} else {
color("silver")
render()
translate([0,0,-tlnt[2] -tlnt[3] - (tlnt[4] - tlnt[3])])
difference() {
union() {
translate([0,0,tlnt[2]-0.5-eta]) cube([tlnt[1],tlnt[0],1+2*eta],center=true);
translate([0,0,(tlnt[2]-1)/2]) rotate([90,0,0]) trapezoidPrism(tlnt[1],tlnt[0],tlnt[2]-1,-(tlnt[1] - tlnt[0])/2,tlnt[0],center=true);
translate([0,0,tlnt[3]/2 + tlnt[2]-eta]) cube([tlnt[0],tlnt[0],tlnt[3] + eta],center=true);
}
translate([0,0,-1]) cylinder(h=20, r=tlnt[2]/2, $fn=8);
}
}
}
module tslot_20x20_base(l,detailed){
aluProExtrusion(BR_20x20, l=l, detailed=detailed);
}
module tslot_20x20_1s_base(l,detailed){
aluProExtrusion(BR_20x20_1S, l=l, detailed=detailed);
}
module tslot_20x20_2s_base(l,detailed){
aluProExtrusion(BR_20x20_2S, l=l, detailed=detailed);
}
module tslot_20x20_2sa_base(l,detailed){
aluProExtrusion(BR_20x20_2SA, l=l, detailed=detailed);
}
module tslot_20x20_3s_base(l,detailed){
aluProExtrusion(BR_20x20_3S, l=l, detailed=detailed);
}
// aluProExtrusion(BR_20x40, l=70, center=false);
// aluProExtrusion(BR_20x60, center=true);
// aluProExtrusion(BR_20x80, center=false);

31
hardware/case/BOLTS_OpenSCAD_0.3_gpl3/base/batteries.scad Normal file
View File

@@ -0,0 +1,31 @@
/* Pipe module for OpenSCAD
* Copyright (C) 2013 Johannes Reinhardt <jreinhardt@ist-dein-freund.de>
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; either
* version 2.1 of the License, or (at your option) any later version.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
*/
module roundBatteryBase(h,d){
union(){
//nub
cylinder(r=d/6,h=h);
//cell
cylinder(r=d/2,h=0.97*h);
}
}
function roundBatteryConn(h,location) =
(location == "plus") ? [[0,0,h],[[0,0,1],[0,1,0]]] :
(location == "minus") ? [[0,0,0],[[0,0,1],[0,1,0]]] :
"Error";

76
hardware/case/BOLTS_OpenSCAD_0.3_gpl3/base/bearings.scad Normal file
View File

@@ -0,0 +1,76 @@
/*
* BOLTS - Open Library of Technical Specifications
* Copyright (C) 2013 Johannes Reinhardt <jreinhardt@ist-dein-freund.de>
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; either
* version 2.1 of the License, or any later version.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
*/
//square torus, r1 is big radius, r2 is small radius
module makeSquorus(r1,r2){
difference(){
cylinder(r=r1+r2,h=2*r2,center=true);
cylinder(r=r1-r2,h=3*r2,center=true);
}
}
//r1 is inner, r2 is outer
module makeRing(r1,r2,h){
difference(){
cylinder(r=r2,h=h,center=true);
cylinder(r=r1,h=2*h,center=true);
}
}
module singlerowradialbearing(d1,d2,B){
rb = B/4;
n = ceil((d2-d1)/rb);
translate([0,0,B/2]){
union(){
difference(){
cylinder(r=d2/2,h=B,center=true);
cylinder(r=d1/2,h=B+0.01,center=true);
//gap
makeRing(d1/2+0.3*(d2-d1)/2,d1/2+0.6*(d2-d1)/2,2*B);
//track
makeSquorus((d2-d1)/2,rb);
}
for ( i = [0 : n-1] ){
rotate( i * 360 / n, [0, 0,1])
translate([0, (d2-d1)/2, 0])
sphere(r = rb);
}
}
}
}
module axialthrustbearing(d1_w,d2_w,d1_g,d2_g,B){
rb = B/4;
n = ceil((d2_w+d1_w)/2/rb);
union(){
difference(){
union(){
translate([0,0,-0.35*B]) makeRing(d1_g/2,d2_g/2,0.3*B);
translate([0,0,+0.35*B]) makeRing(d1_w/2,d2_w/2,0.3*B);
}
//track
makeSquorus((d2_w+d1_w)/4,rb);
}
for ( i = [0 : n-1] ){
rotate( i * 360 / n, [0, 0,1])
translate([0, (d2_w+d1_w)/4, 0])
sphere(r = rb);
}
}
}

48
hardware/case/BOLTS_OpenSCAD_0.3_gpl3/base/hex.scad Normal file
View File

@@ -0,0 +1,48 @@
/*
* BOLTS - Open Library of Technical Specifications
* Copyright (C) 2013 Johannes Reinhardt <jreinhardt@ist-dein-freund.de>
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; either
* version 2.1 of the License, or any later version.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
*/
module hex1(d1,k,s,h,l){
union(){
hex_head(k,s);
//possibly unthreaded shaft
cylinder(r=d1/2,h=h);
//threaded shaft
translate([0,0,h]) thread_external(d1,l-h);
}
}
module hex2(d1, k, s, b1, b2, b3, l){
b = (l < 125) ? b1 :
(l < 200) ? b2 :
b3;
check_dimension_defined(b, "threaded shaft length b");
union(){
hex_head(k,s);
//unthreaded shaft
cylinder(r=d1/2,h=l-b);
//threaded shaft
translate([0,0,l-b]) thread_external(d1,b);
}
}
function hexConn(k,l,location) =
(location == "root") ? [[0,0,0],[[0,0,1],[0,1,0]]] :
(location == "tip") ? [[0,0,l],[[0,0,1],[0,1,0]]] :
(location == "head") ? [[0,0,-k],[[0,0,-1],[0,-1,0]]] :
"Error";

61
hardware/case/BOLTS_OpenSCAD_0.3_gpl3/base/hex_socket.scad Normal file
View File

@@ -0,0 +1,61 @@
/*
* BOLTS - Open Library of Technical Specifications
* Copyright (C) 2013 Johannes Reinhardt <jreinhardt@ist-dein-freund.de>
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; either
* version 2.1 of the License, or any later version.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
*/
module hex_socket1(d1,d2,b1,b2,b3,k_max,s,t,L,h_max,l){
b = (l <= L) ? l - k_max - h_max :
l < 125 ? b1 :
l < 200 ? b2 :
b3;
h = l - k_max - b;
//TODO: These checks are not very careful
check_dimension_defined(b,"threaded shaft length b");
check_dimension_defined(t,"socket depth t");
check_dimension_defined(h_max,"unthreaded shaft length h_max");
difference(){
union(){
//Head
cylinder(r1=d2/2,r2=d1/2,h = k_max);
//unthreaded shaft
cylinder(r=d1/2,h=k_max+h);
//threaded shaft
translate([0,0,k_max+h]) thread_external(d1,b);
}
hex_socket_neg(t,s);
}
}
module hex_socket2(d1,d2,b,k,s,t_min,L,l){
h = (l<= L) ? 0 : l - b;
check_dimension_positive(h,"l too short");
difference(){
union(){
//Head
translate([0,0,-k]) cylinder(r=d2/2,h = k);
//unthreaded shaft
cylinder(r=d1/2,h=h);
//threaded shaft
translate([0,0,h]) thread_external(d1,b);
}
translate([0,0,-k]) hex_socket_neg(t_min,s);
}
}

33
hardware/case/BOLTS_OpenSCAD_0.3_gpl3/base/nut.scad Normal file
View File

@@ -0,0 +1,33 @@
/*
* BOLTS - Open Library of Technical Specifications
* Copyright (C) 2013 Johannes Reinhardt <jreinhardt@ist-dein-freund.de>
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; either
* version 2.1 of the License, or any later version.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
*/
module nut1(d1, s, m_max){
//hex sidelength
a = s/tan(60);
translate([0,0,m_max]){
difference(){
hex_head(m_max,s);
translate([0,0,-d1]) cylinder(r=d1/2,h=m_max+ 2*d1);
}
}
}
function nutConn(m_max,location) =
(location == "bottom") ? [[0,0,0],[[0,0,1],[0,1,0]]] :
(location == "top") ? [[0,0,m_max],[[0,0,1],[0,1,0]]] :
"Error";

39
hardware/case/BOLTS_OpenSCAD_0.3_gpl3/base/pipe.scad Normal file
View File

@@ -0,0 +1,39 @@
/* Pipe module for OpenSCAD
* Copyright (C) 2013 Johannes Reinhardt <jreinhardt@ist-dein-freund.de>
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; either
* version 2.1 of the License, or any later version.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
*/
module pipe(id,od,l){
difference(){
cylinder(r=od/2,h=l,center=true);
cylinder(r=id/2,h=l+1,center=true);
}
}
module pipe_wall(od,wall,l){
difference(){
cylinder(r=od/2,h=l,center=true);
cylinder(r=(od - 2*wall)/2,h=l+1,center=true);
}
}
function pipeConn(l,location) =
(location == "front-in") ? [[0,0,-l/2],[[0,0,1],[1,0,0]]] :
(location == "front-out") ? [[0,0,-l/2],[[0,0,-1],[-1,0,0]]] :
(location == "back-in") ? [[0,0,+l/2],[[0,0,-1],[-1,0,0]]] :
(location == "back-out") ? [[0,0,+l/2],[[0,0,1],[1,0,0]]] :
"Error";

43
hardware/case/BOLTS_OpenSCAD_0.3_gpl3/base/washer.scad Normal file
View File

@@ -0,0 +1,43 @@
/*
* BOLTS - Open Library of Technical Specifications
* Copyright (C) 2013 Johannes Reinhardt <jreinhardt@ist-dein-freund.de>
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; either
* version 2.1 of the License, or any later version.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
*/
module washer1(d1,d2,s){
difference(){
cylinder(r=d2/2,h=s);
translate([0,0,-0.1*s])
cylinder(r=d1/2,h=1.2*s);
}
}
module washer2(d1,d2,s){
intersection(){
difference(){
cylinder(r=d2/2,h=s);
translate([0,0,-0.1*s])
cylinder(r=d1/2,h=1.2*s);
cylinder(r1=d1/2-s,r2 = d1/2+s,1.1*s);
}
cylinder(r1 = d2/2+s, r2 = d2/2-s,1.1*s);
}
}
function washerConn(d2,s,location) =
(location == "bottom") ? [[0,0,0],[[0,0,1],[0,1,0]]] :
(location == "top") ? [[0,0,s],[[0,0,1],[0,1,0]]] :
(location == "outer") ? [[d2/2,0,0],[[1,0,0],[0,1,0]]] :
"Error";