Replaced bearings.scad with bearing.scad (from http://github.com/zzorn/FunRap)

This commit is contained in:
Elmom 2010-07-26 10:58:32 +03:00
parent 4063268387
commit c803681562
3 changed files with 69 additions and 12 deletions

4
README
View file

@ -20,12 +20,14 @@ Currently Provided Tools:
Other tools (alpha quality): Other tools (alpha quality):
* nuts_and_bolts.scad: for creating metric and imperial bolt/nut holes * nuts_and_bolts.scad: for creating metric and imperial bolt/nut holes
* bearings.scad: standard/custom bearings * bearing.scad: standard/custom bearings
* screw.cad: screws and augers * screw.cad: screws and augers
* materials.scad: color definitions for different materials
Utils: Utils:
* math.scad: general math functions * math.scad: general math functions
* constants.scad: mathematical constants * constants.scad: mathematical constants
* curves.scad: mathematical functions defining curves * curves.scad: mathematical functions defining curves
* units.scad: easy metric units
You are welcome to fork this project in github and request pulls. I will try to accomodate the community as much as possible in this. You are welcome to fork this project in github and request pulls. I will try to accomodate the community as much as possible in this.

66
bearing.scad Normal file
View file

@ -0,0 +1,66 @@
/*
* Bearing model.
*
* Originally by Hans Häggström, 2010.
* Dual licenced under Creative Commons Attribution-Share Alike 3.0 and LGPL2 or later
*/
include <units.scad>
include <materials.scad>
module bearing_test(){
bearing();
bearing(pos=[5*cm, 0,0], angle=[90,0,0]);
bearing(pos=[-2.5*cm, 0,0], model=Bearing688);
}
BEARING_INNER_DIAMETER = 0;
BEARING_OUTER_DIAMETER = 1;
BEARING_WIDTH = 2;
Bearing608 = [8*mm, 22*mm, 7*mm];
Bearing627 = [7*mm, 22*mm, 7*mm];
Bearing688 = [8*mm, 16*mm, 5*mm];
SkateBearing = Bearing608;
function bearingWidth(model) = model[BEARING_WIDTH];
function bearingInnerDiameter(model) = model[BEARING_INNER_DIAMETER];
function bearingOuterDiameter(model) = model[BEARING_OUTER_DIAMETER];
module bearing(pos=[0,0,0], angle=[0,0,0], model=SkateBearing, material=Steel, sideMaterial=Brass) {
w = bearingWidth(model);
innerD = bearingInnerDiameter(model);
outerD = bearingOuterDiameter(model);
innerRim = innerD + (outerD - innerD) * 0.2;
outerRim = outerD - (outerD - innerD) * 0.2;
midSink = w * 0.1;
color(material)
translate(pos)
rotate(angle) {
difference() {
// Basic ring
Ring([0,0,0], outerD, innerD, w, material, material);
// Side shields
Ring([0,0,-epsilon], outerRim, innerRim, epsilon+midSink, sideMaterial, material);
Ring([0,0,w-midSink], outerRim, innerRim, epsilon+midSink, sideMaterial, material);
}
}
module Ring(pos, od, id, h, material, holeMaterial) {
color(material) {
translate(pos)
difference() {
cylinder(r=od/2, h=h, $fs = 0.01);
color(holeMaterial)
translate([0,0,-10*epsilon])
cylinder(r=id/2, h=h+20*epsilon, $fs = 0.01);
}
}
}
}

View file

@ -1,11 +0,0 @@
// License: GPL 2.0
//Todo: placeholder; should generate standard + cusom bearing mounting holes
module bearing_hole(outer_radius, hole=true, mochup=true)
{
union()
{
if (mochup==true) %translate([0,0,-1.5])cylinder(r=outer_radius,h=3);
if (hole==true) circle(r=outer_radius);
}
}