grey/BOSL2
1
0
Fork 0
mirror of https://github.com/BelfrySCAD/BOSL2.git synced 2024-12-29 16:29:40 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

change interior to internal, add default tags for internal

Browse source
This commit is contained in:
Adrian Mariano 2023-06-19 23:41:39 -04:00
parent 34489a7b44
commit 465da2e5c3
2 changed files with 103 additions and 106 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
attachments.scad
View file

@ -587,6 +587,7 @@ module orient(anchor, spin) {
// `$attach_anchor` for each anchor given, this is set to the `[ANCHOR, POSITION, ORIENT, SPIN]` information for that anchor. // `$attach_anchor` for each anchor given, this is set to the `[ANCHOR, POSITION, ORIENT, SPIN]` information for that anchor.
// `$attach_to` is set to `undef`. // `$attach_to` is set to `undef`.
// `$attach_norot` is set to `true`. // `$attach_norot` is set to `true`.
// `$anchor_override` is set to the anchor required for proper positioning of the child.
// if inside is true then set default tag to "remove" // if inside is true then set default tag to "remove"
// Example: Child would require anchor of RIGHT+FRONT+BOT if placed with {{position()}}. // Example: Child would require anchor of RIGHT+FRONT+BOT if placed with {{position()}}.
// cuboid([50,40,15]) // cuboid([50,40,15])
@ -656,12 +657,10 @@ module align(anchor,orient=UP,spin,inside=false)
translate(pos_anch[1]) { translate(pos_anch[1]) {
if (two_d) if (two_d)
rot(spin)rot(from=fromvec, to=orient_anch[2]) rot(spin)rot(from=fromvec, to=orient_anch[2])
if (inside) default_tag("remove") children(); default_tag("remove",inside) children();
else children();
else else
rot(spin, from=fromvec, to=orient_anch[2]) rot(spin, from=fromvec, to=orient_anch[2])
if (inside) default_tag("remove") children(); default_tag("remove",inside) children();
else children();
} }
} }
} }
@ -841,10 +840,12 @@ module force_tag(tag)
// set so you can have a module set a default tag of "remove" but that tag can be overridden by a {{tag()}} // set so you can have a module set a default tag of "remove" but that tag can be overridden by a {{tag()}}
// in force from a parent. If you use {{tag()}} it will override any previously // in force from a parent. If you use {{tag()}} it will override any previously
// specified tag from a parent, which can be very confusing to a user trying to change the tag on a module. // specified tag from a parent, which can be very confusing to a user trying to change the tag on a module.
// The `do_tag` parameter allows you to apply a default tag conditionally without having to repeat the children.
// . // .
// For a step-by-step explanation of attachments, see the [Attachments Tutorial](Tutorial-Attachments). // For a step-by-step explanation of attachments, see the [Attachments Tutorial](Tutorial-Attachments).
// Arguments: // Arguments:
// tag = tag string, which must not contain any spaces. // tag = tag string, which must not contain any spaces.
// do_tag = if false do not set the tag.
// Side Effects: // Side Effects:
// Sets `$tag` to the tag you specify, possibly with a scope prefix. // Sets `$tag` to the tag you specify, possibly with a scope prefix.
// Example(3D): The module thing() is defined with {{tag()}} and the user applied tag of "keep_it" is ignored, leaving the user puzzled. // Example(3D): The module thing() is defined with {{tag()}} and the user applied tag of "keep_it" is ignored, leaving the user puzzled.
@ -861,7 +862,7 @@ module force_tag(tag)
// position(TOP) thing(); // position(TOP) thing();
// position(RIGHT) tag("keep_it") thing(); // position(RIGHT) tag("keep_it") thing();
// } // }
module default_tag(tag) module default_tag(tag,skip=false)
{ {
if ($tag=="") tag(tag) children(); if ($tag=="") tag(tag) children();
else children(); else children();

198
gears.scad
View file

@ -31,7 +31,7 @@
// Topics: Gears, Parts // Topics: Gears, Parts
// See Also: rack(), spur_gear(), spur_gear2d(), bevel_gear() // See Also: rack(), spur_gear(), spur_gear2d(), bevel_gear()
// Usage: As a Module // Usage: As a Module
// spur_gear(pitch, teeth, thickness, [shaft_diam], [hide=], [pressure_angle=], [clearance=], [backlash=], [helical=], [slices=], [interior=]) [ATTACHMENTS]; // spur_gear(pitch, teeth, thickness, [shaft_diam], [hide=], [pressure_angle=], [clearance=], [backlash=], [helical=], [slices=], [internal=]) [ATTACHMENTS];
// spur_gear(mod=, teeth=, thickness=, [shaft_diam=], ...) [ATTACHMENTS]; // spur_gear(mod=, teeth=, thickness=, [shaft_diam=], ...) [ATTACHMENTS];
// Usage: As a Function // Usage: As a Function
// vnf = spur_gear(pitch, teeth, thickness, [shaft_diam=], ...); // vnf = spur_gear(pitch, teeth, thickness, [shaft_diam=], ...);
@ -77,11 +77,13 @@
// helical = Teeth are slanted around the spur gear at this angle away from the gear axis of rotation. // helical = Teeth are slanted around the spur gear at this angle away from the gear axis of rotation.
// slices = Number of vertical layers to divide gear into. Useful for refining gears with `helical`. // slices = Number of vertical layers to divide gear into. Useful for refining gears with `helical`.
// scale = Scale of top of gear compared to bottom. Useful for making crown gears. // scale = Scale of top of gear compared to bottom. Useful for making crown gears.
// interior = If true, create a mask for difference()ing from something else. // internal = If true, create a mask for difference()ing from something else.
// mod = The metric module/modulus of the gear. // mod = The metric module/modulus of the gear.
// anchor = Translate so anchor point is at origin (0,0,0). See [anchor](attachments.scad#subsection-anchor). Default: `CENTER` // anchor = Translate so anchor point is at origin (0,0,0). See [anchor](attachments.scad#subsection-anchor). Default: `CENTER`
// spin = Rotate this many degrees around the Z axis after anchor. See [spin](attachments.scad#subsection-spin). Default: `0` // spin = Rotate this many degrees around the Z axis after anchor. See [spin](attachments.scad#subsection-spin). Default: `0`
// orient = Vector to rotate top towards, after spin. See [orient](attachments.scad#subsection-orient). Default: `UP` // orient = Vector to rotate top towards, after spin. See [orient](attachments.scad#subsection-orient). Default: `UP`
// Side Effects:
// If internal is true then the default tag is "remove"
// Example: Spur Gear // Example: Spur Gear
// spur_gear(pitch=5, teeth=20, thickness=8, shaft_diam=5); // spur_gear(pitch=5, teeth=20, thickness=8, shaft_diam=5);
// Example: Metric Gear // Example: Metric Gear
@ -140,13 +142,13 @@
// pitch=5; thick=10; pa=20; // pitch=5; thick=10; pa=20;
// prad = (pitch_radius(pitch,rteeth) + // prad = (pitch_radius(pitch,rteeth) +
// pitch_radius(pitch,cteeth)) / 2; // pitch_radius(pitch,cteeth)) / 2;
// rrad = outer_radius(pitch,rteeth,interior=true) + 5; // rrad = outer_radius(pitch,rteeth,internal=true) + 5;
// diff() // diff()
// cyl(r=rrad,l=thick) // cyl(r=rrad,l=thick)
// tag("remove") // tag("remove")
// spur_gear( // spur_gear(
// pitch=pitch, teeth=rteeth, thickness=thick+1, // pitch=pitch, teeth=rteeth, thickness=thick+1,
// pressure_angle=pa, interior=true); // pressure_angle=pa, internal=true);
// for (a=[0:3]) { // for (a=[0:3]) {
// zrot($t*90+a*90) back(prad) { // zrot($t*90+a*90) back(prad) {
// color("green") // color("green")
@ -176,17 +178,20 @@ function spur_gear(
backlash = 0.0, backlash = 0.0,
helical = 0, helical = 0,
slices = 2, slices = 2,
interior = false, interior,
internal,
mod, mod,
anchor = CENTER, anchor = CENTER,
spin = 0, spin = 0,
orient = UP orient = UP
) = ) =
assert(is_undef(interior), "The interior paramter to spur_gear has been replaced by internal and will be removed.")
let( let(
internal = first_defined([internal,interior,false]),
pitch = is_undef(mod) ? pitch : pitch_value(mod), pitch = is_undef(mod) ? pitch : pitch_value(mod),
p = pitch_radius(pitch, teeth), p = pitch_radius(pitch, teeth),
c = outer_radius(pitch, teeth, clearance, interior), c = outer_radius(pitch, teeth, clearance, internal),
r = _root_radius(pitch, teeth, clearance, interior), r = _root_radius(pitch, teeth, clearance, internal),
twist = atan2(thickness*tan(helical),p), twist = atan2(thickness*tan(helical),p),
rgn = [ rgn = [
spur_gear2d( spur_gear2d(
@ -196,7 +201,7 @@ function spur_gear(
hide = hide, hide = hide,
clearance = clearance, clearance = clearance,
backlash = backlash, backlash = backlash,
interior = interior internal = internal
), ),
if (shaft_diam > 0) circle(d=shaft_diam, $fn=max(12,segs(shaft_diam/2))) if (shaft_diam > 0) circle(d=shaft_diam, $fn=max(12,segs(shaft_diam/2)))
], ],
@ -215,36 +220,40 @@ module spur_gear(
backlash = 0.0, backlash = 0.0,
helical = 0, helical = 0,
slices = 2, slices = 2,
interior = false, internal,
interior,
mod, mod,
anchor = CENTER, anchor = CENTER,
spin = 0, spin = 0,
orient = UP orient = UP
) { ) {
assert(is_undef(interior), "The interior paramter to spur_gear has been replaced by internal and will be removed.");
internal = first_defined([internal,interior,false]);
pitch = is_undef(mod) ? pitch : pitch_value(mod); pitch = is_undef(mod) ? pitch : pitch_value(mod);
p = pitch_radius(pitch, teeth); p = pitch_radius(pitch, teeth);
c = outer_radius(pitch, teeth, clearance, interior); c = outer_radius(pitch, teeth, clearance, internal);
r = _root_radius(pitch, teeth, clearance, interior); r = _root_radius(pitch, teeth, clearance, internal);
twist = atan2(thickness*tan(helical),p); twist = atan2(thickness*tan(helical),p);
attachable(anchor,spin,orient, r=p, l=thickness) { default_tag("remove", internal)
difference() { attachable(anchor,spin,orient, r=p, l=thickness) {
linear_extrude(height=thickness, center=true, convexity=teeth/2, twist=twist) { difference() {
spur_gear2d( linear_extrude(height=thickness, center=true, convexity=teeth/2, twist=twist) {
pitch = pitch, spur_gear2d(
teeth = teeth, pitch = pitch,
pressure_angle = pressure_angle, teeth = teeth,
hide = hide, pressure_angle = pressure_angle,
clearance = clearance, hide = hide,
backlash = backlash, clearance = clearance,
interior = interior backlash = backlash,
); internal = internal
} );
if (shaft_diam > 0) { }
cylinder(h=2*thickness+1, r=shaft_diam/2, center=true, $fn=max(12,segs(shaft_diam/2))); if (shaft_diam > 0) {
cylinder(h=2*thickness+1, r=shaft_diam/2, center=true, $fn=max(12,segs(shaft_diam/2)));
}
} }
children();
} }
children();
}
} }
@ -254,11 +263,11 @@ module spur_gear(
// Topics: Gears, Parts // Topics: Gears, Parts
// See Also: rack(), spur_gear(), spur_gear2d(), bevel_gear() // See Also: rack(), spur_gear(), spur_gear2d(), bevel_gear()
// Usage: As Module // Usage: As Module
// spur_gear2d(pitch, teeth, [hide=], [pressure_angle=], [clearance=], [backlash=], [interior=]) [ATTACHMENTS]; // spur_gear2d(pitch, teeth, [hide=], [pressure_angle=], [clearance=], [backlash=], [internal=]) [ATTACHMENTS];
// spur_gear2d(mod=, teeth=, [hide=], [pressure_angle=], [clearance=], [backlash=], [interior=]) [ATTACHMENTS]; // spur_gear2d(mod=, teeth=, [hide=], [pressure_angle=], [clearance=], [backlash=], [internal=]) [ATTACHMENTS];
// Usage: As Function // Usage: As Function
// poly = spur_gear2d(pitch, teeth, [hide=], [pressure_angle=], [clearance=], [backlash=], [interior=]); // poly = spur_gear2d(pitch, teeth, [hide=], [pressure_angle=], [clearance=], [backlash=], [internal=]);
// poly = spur_gear2d(mod=, teeth=, [hide=], [pressure_angle=], [clearance=], [backlash=], [interior=]); // poly = spur_gear2d(mod=, teeth=, [hide=], [pressure_angle=], [clearance=], [backlash=], [internal=]);
// Description: // Description:
// When called as a module, creates a 2D involute spur gear. When called as a function, returns a // When called as a module, creates a 2D involute spur gear. When called as a function, returns a
// 2D path for the perimeter of a 2D involute spur gear. Normally, you should just specify the // 2D path for the perimeter of a 2D involute spur gear. Normally, you should just specify the
@ -272,7 +281,7 @@ module spur_gear(
// pressure_angle = Controls how straight or bulged the tooth sides are. In degrees. // pressure_angle = Controls how straight or bulged the tooth sides are. In degrees.
// clearance = Gap between top of a tooth on one gear and bottom of valley on a meshing gear (in millimeters) // clearance = Gap between top of a tooth on one gear and bottom of valley on a meshing gear (in millimeters)
// backlash = Gap between two meshing teeth, in the direction along the circumference of the pitch circle // backlash = Gap between two meshing teeth, in the direction along the circumference of the pitch circle
// interior = If true, create a mask for difference()ing from something else. // internal = If true, create a mask for difference()ing from something else.
// mod = The metric module/modulus of the gear. // mod = The metric module/modulus of the gear.
// anchor = Translate so anchor point is at origin (0,0,0). See [anchor](attachments.scad#subsection-anchor). Default: `CENTER` // anchor = Translate so anchor point is at origin (0,0,0). See [anchor](attachments.scad#subsection-anchor). Default: `CENTER`
// spin = Rotate this many degrees around the Z axis after anchor. See [spin](attachments.scad#subsection-spin). Default: `0` // spin = Rotate this many degrees around the Z axis after anchor. See [spin](attachments.scad#subsection-spin). Default: `0`
@ -294,11 +303,15 @@ function spur_gear2d(
pressure_angle = 28, pressure_angle = 28,
clearance = undef, clearance = undef,
backlash = 0.0, backlash = 0.0,
interior = false, internal,
interior,
mod, mod,
anchor = CENTER, anchor = CENTER,
spin = 0 spin = 0
) = let( ) =
assert(is_undef(interior), "The interior paramter to spur_gear2d has been replaced by internal and will be removed.")
let(
internal = first_defined([internal,internal,false]),
pitch = is_undef(mod) ? pitch : pitch_value(mod), pitch = is_undef(mod) ? pitch : pitch_value(mod),
pr = pitch_radius(pitch=pitch, teeth=teeth), pr = pitch_radius(pitch=pitch, teeth=teeth),
tooth_profile = _gear_tooth_profile( tooth_profile = _gear_tooth_profile(
@ -307,7 +320,7 @@ function spur_gear2d(
pressure_angle = pressure_angle, pressure_angle = pressure_angle,
clearance = clearance, clearance = clearance,
backlash = backlash, backlash = backlash,
interior = interior, internal = internal,
valleys = false valleys = false
), ),
pts = concat( pts = concat(
@ -326,11 +339,14 @@ module spur_gear2d(
pressure_angle = 28, pressure_angle = 28,
clearance = undef, clearance = undef,
backlash = 0.0, backlash = 0.0,
interior = false, internal,
interior,
mod, mod,
anchor = CENTER, anchor = CENTER,
spin = 0 spin = 0
) { ) {
assert(is_undef(interior), "The interior paramter to spur_gear2d has been replaced by internal and will be removed.");
internal = first_defined([internal,interior,false]);
pitch = is_undef(mod) ? pitch : pitch_value(mod); pitch = is_undef(mod) ? pitch : pitch_value(mod);
path = spur_gear2d( path = spur_gear2d(
pitch = pitch, pitch = pitch,
@ -339,7 +355,7 @@ module spur_gear2d(
pressure_angle = pressure_angle, pressure_angle = pressure_angle,
clearance = clearance, clearance = clearance,
backlash = backlash, backlash = backlash,
interior = interior internal = internal
); );
pr = pitch_radius(pitch=pitch, teeth=teeth); pr = pitch_radius(pitch=pitch, teeth=teeth);
attachable(anchor,spin, two_d=true, r=pr) { attachable(anchor,spin, two_d=true, r=pr) {
@ -630,11 +646,11 @@ module rack2d(
// Topics: Gears, Parts // Topics: Gears, Parts
// See Also: rack(), rack2d(), spur_gear(), spur_gear2d(), bevel_pitch_angle(), bevel_gear() // See Also: rack(), rack2d(), spur_gear(), spur_gear2d(), bevel_pitch_angle(), bevel_gear()
// Usage: As a Module // Usage: As a Module
// bevel_gear(pitch, teeth, face_width, [pitch_angle=]|[mate_teeth=], [shaft_diam=], [hide=], [pressure_angle=], [clearance=], [backlash=], [cutter_radius=], [spiral_angle=], [left_handed=], [slices=], [interior=]); // bevel_gear(pitch, teeth, face_width, [pitch_angle=]|[mate_teeth=], [shaft_diam=], [hide=], [pressure_angle=], [clearance=], [backlash=], [cutter_radius=], [spiral_angle=], [left_handed=], [slices=], [internal=]);
// bevel_gear(mod=, teeth=, face_width=, [pitch_angle=]|[mate_teeth=], [shaft_diam=], [hide=], [pressure_angle=], [clearance=], [backlash=], [cutter_radius=], [spiral_angle=], [left_handed=], [slices=], [interior=]); // bevel_gear(mod=, teeth=, face_width=, [pitch_angle=]|[mate_teeth=], [shaft_diam=], [hide=], [pressure_angle=], [clearance=], [backlash=], [cutter_radius=], [spiral_angle=], [left_handed=], [slices=], [internal=]);
// Usage: As a Function // Usage: As a Function
// vnf = bevel_gear(pitch, teeth, face_width, [pitch_angle=]|[mate_teeth=], [hide=], [pressure_angle=], [clearance=], [backlash=], [cutter_radius=], [spiral_angle=], [left_handed=], [slices=], [interior=]); // vnf = bevel_gear(pitch, teeth, face_width, [pitch_angle=]|[mate_teeth=], [hide=], [pressure_angle=], [clearance=], [backlash=], [cutter_radius=], [spiral_angle=], [left_handed=], [slices=], [internal=]);
// vnf = bevel_gear(mod=, teeth=, face_width=, [pitch_angle=]|[mate_teeth=], [hide=], [pressure_angle=], [clearance=], [backlash=], [cutter_radius=], [spiral_angle=], [left_handed=], [slices=], [interior=]); // vnf = bevel_gear(mod=, teeth=, face_width=, [pitch_angle=]|[mate_teeth=], [hide=], [pressure_angle=], [clearance=], [backlash=], [cutter_radius=], [spiral_angle=], [left_handed=], [slices=], [internal=]);
// Description: // Description:
// Creates a (potentially spiral) bevel gear. The module `bevel_gear()` gives a bevel gear, with // Creates a (potentially spiral) bevel gear. The module `bevel_gear()` gives a bevel gear, with
// reasonable defaults for all the parameters. Normally, you should just choose the first 4 // reasonable defaults for all the parameters. Normally, you should just choose the first 4
@ -666,9 +682,9 @@ module rack2d(
// pitch = The circular pitch, or distance between teeth around the pitch circle, in mm. Default: 5 // pitch = The circular pitch, or distance between teeth around the pitch circle, in mm. Default: 5
// teeth = Total number of teeth around the entire perimeter. Default: 20 // teeth = Total number of teeth around the entire perimeter. Default: 20
// face_width = Width of the toothed surface in mm, from inside to outside. Default: 10 // face_width = Width of the toothed surface in mm, from inside to outside. Default: 10
// ---
// pitch_angle = Angle of beveled gear face. Default: 45 // pitch_angle = Angle of beveled gear face. Default: 45
// mate_teeth = The number of teeth in the gear that this gear will mate with. Overrides `pitch_angle` if given. // mate_teeth = The number of teeth in the gear that this gear will mate with. Overrides `pitch_angle` if given.
// ---
// shaft_diam = Diameter of the hole in the center, in mm. Module use only. Default: 0 (no shaft hole) // shaft_diam = Diameter of the hole in the center, in mm. Module use only. Default: 0 (no shaft hole)
// hide = Number of teeth to delete to make this only a fraction of a circle. Default: 0 // hide = Number of teeth to delete to make this only a fraction of a circle. Default: 0
// pressure_angle = Controls how straight or bulged the tooth sides are. In degrees. Default: 28 // pressure_angle = Controls how straight or bulged the tooth sides are. In degrees. Default: 28
@ -678,7 +694,7 @@ module rack2d(
// spiral_angle = The base angle for spiral teeth. Default: 0 // spiral_angle = The base angle for spiral teeth. Default: 0
// left_handed = If true, the gear returned will have a left-handed spiral. Default: false // left_handed = If true, the gear returned will have a left-handed spiral. Default: false
// slices = Number of vertical layers to divide gear into. Useful for refining gears with `spiral`. Default: 1 // slices = Number of vertical layers to divide gear into. Useful for refining gears with `spiral`. Default: 1
// interior = If true, create a mask for difference()ing from something else. // internal = If true, create a mask for difference()ing from something else.
// mod = The metric module/modulus of the gear. // mod = The metric module/modulus of the gear.
// anchor = Translate so anchor point is at origin (0,0,0). See [anchor](attachments.scad#subsection-anchor). Default: `CENTER` // anchor = Translate so anchor point is at origin (0,0,0). See [anchor](attachments.scad#subsection-anchor). Default: `CENTER`
// spin = Rotate this many degrees around the Z axis after anchor. See [spin](attachments.scad#subsection-spin). Default: `0` // spin = Rotate this many degrees around the Z axis after anchor. See [spin](attachments.scad#subsection-spin). Default: `0`
@ -687,6 +703,8 @@ module rack2d(
// "apex" = At the pitch cone apex for the bevel gear. // "apex" = At the pitch cone apex for the bevel gear.
// "pitchbase" = At the natural height of the pitch radius of the beveled gear. // "pitchbase" = At the natural height of the pitch radius of the beveled gear.
// "flattop" = At the top of the flat top of the bevel gear. // "flattop" = At the top of the flat top of the bevel gear.
// Side Effects:
// If internal is true then the default tag is "remove"
// Example: Beveled Gear // Example: Beveled Gear
// bevel_gear( // bevel_gear(
// pitch=5, teeth=36, face_width=10, shaft_diam=5, // pitch=5, teeth=36, face_width=10, shaft_diam=5,
@ -732,18 +750,21 @@ function bevel_gear(
spiral_angle = 35, spiral_angle = 35,
left_handed = false, left_handed = false,
slices = 5, slices = 5,
interior = false, internal,
interior,
mod, mod,
anchor = "pitchbase", anchor = "pitchbase",
spin = 0, spin = 0,
orient = UP orient = UP
) = ) =
assert(is_undef(interior), "The interior paramter to bevel_gear has been replaced by internal and will be removed.")
let( let(
internal = first_defined([internal,interior,false]),
pitch = is_undef(mod) ? pitch : pitch_value(mod), pitch = is_undef(mod) ? pitch : pitch_value(mod),
slices = cutter_radius==0? 1 : slices, slices = cutter_radius==0? 1 : slices,
pitch_angle = is_undef(mate_teeth)? pitch_angle : atan(teeth/mate_teeth), pitch_angle = is_undef(mate_teeth)? pitch_angle : atan(teeth/mate_teeth),
pr = pitch_radius(pitch, teeth), pr = pitch_radius(pitch, teeth),
rr = _root_radius(pitch, teeth, clearance, interior), rr = _root_radius(pitch, teeth, clearance, internal),
pitchoff = (pr-rr) * sin(pitch_angle), pitchoff = (pr-rr) * sin(pitch_angle),
ocone_rad = opp_ang_to_hyp(pr, pitch_angle), ocone_rad = opp_ang_to_hyp(pr, pitch_angle),
icone_rad = ocone_rad - face_width, icone_rad = ocone_rad - face_width,
@ -761,7 +782,7 @@ function bevel_gear(
pressure_angle = pressure_angle, pressure_angle = pressure_angle,
clearance = clearance, clearance = clearance,
backlash = backlash, backlash = backlash,
interior = interior, internal = internal,
valleys = false, valleys = false,
center = true center = true
), ),
@ -840,18 +861,21 @@ module bevel_gear(
spiral_angle = 35, spiral_angle = 35,
left_handed = false, left_handed = false,
slices = 5, slices = 5,
interior = false, internal,
interior,
mod, mod,
anchor = "pitchbase", anchor = "pitchbase",
spin = 0, spin = 0,
orient = UP orient = UP
) { ) {
assert(is_undef(interior), "The interior paramter to bevel_gear has been replaced by internal and will be removed.");
internal = first_defined([internal,interior,false]);
pitch = is_undef(mod) ? pitch : pitch_value(mod); pitch = is_undef(mod) ? pitch : pitch_value(mod);
slices = cutter_radius==0? 1 : slices; slices = cutter_radius==0? 1 : slices;
pitch_angle = is_undef(mate_teeth)? pitch_angle : atan(teeth/mate_teeth); pitch_angle = is_undef(mate_teeth)? pitch_angle : atan(teeth/mate_teeth);
pr = pitch_radius(pitch, teeth); pr = pitch_radius(pitch, teeth);
ipr = pr - face_width*sin(pitch_angle); ipr = pr - face_width*sin(pitch_angle);
rr = _root_radius(pitch, teeth, clearance, interior); rr = _root_radius(pitch, teeth, clearance, internal);
pitchoff = (pr-rr) * sin(pitch_angle); pitchoff = (pr-rr) * sin(pitch_angle);
vnf = bevel_gear( vnf = bevel_gear(
pitch = pitch, pitch = pitch,
@ -866,7 +890,7 @@ module bevel_gear(
spiral_angle = spiral_angle, spiral_angle = spiral_angle,
left_handed = left_handed, left_handed = left_handed,
slices = slices, slices = slices,
interior = interior, internal = internal,
anchor=CENTER anchor=CENTER
); );
axis_zs = [for (p=vnf[0]) if(norm(point2d(p)) < EPSILON) p.z]; axis_zs = [for (p=vnf[0]) if(norm(point2d(p)) < EPSILON) p.z];
@ -876,15 +900,16 @@ module bevel_gear(
named_anchor("flattop", [0,0,thickness/2]), named_anchor("flattop", [0,0,thickness/2]),
named_anchor("apex", [0,0,adj_ang_to_opp(pr,90-pitch_angle)+pitchoff-thickness/2]) named_anchor("apex", [0,0,adj_ang_to_opp(pr,90-pitch_angle)+pitchoff-thickness/2])
]; ];
attachable(anchor,spin,orient, r1=pr, r2=ipr, h=thickness, anchors=anchors) { default_tag("remove",internal)
difference() { attachable(anchor,spin,orient, r1=pr, r2=ipr, h=thickness, anchors=anchors) {
vnf_polyhedron(vnf, convexity=teeth/2); difference() {
if (shaft_diam > 0) { vnf_polyhedron(vnf, convexity=teeth/2);
cylinder(h=2*thickness+1, r=shaft_diam/2, center=true, $fn=max(12,segs(shaft_diam/2))); if (shaft_diam > 0) {
cylinder(h=2*thickness+1, r=shaft_diam/2, center=true, $fn=max(12,segs(shaft_diam/2)));
}
} }
children();
} }
children();
}
} }
@ -1204,9 +1229,9 @@ module worm_gear(
/// Function&Module: _gear_tooth_profile() /// Function&Module: _gear_tooth_profile()
/// Usage: As Module /// Usage: As Module
/// _gear_tooth_profile(pitch|mod, teeth, [pressure_angle], [clearance], [backlash], [interior], [valleys]); /// _gear_tooth_profile(pitch|mod, teeth, [pressure_angle], [clearance], [backlash], [internal], [valleys]);
/// Usage: As Function /// Usage: As Function
/// path = _gear_tooth_profile(pitch|mod, teeth, [pressure_angle], [clearance], [backlash], [interior], [valleys]); /// path = _gear_tooth_profile(pitch|mod, teeth, [pressure_angle], [clearance], [backlash], [internal], [valleys]);
/// Topics: Gears /// Topics: Gears
/// See Also: spur_gear2d() /// See Also: spur_gear2d()
/// Description: /// Description:
@ -1218,7 +1243,7 @@ module worm_gear(
/// pressure_angle = Pressure Angle. Controls how straight or bulged the tooth sides are. In degrees. /// pressure_angle = Pressure Angle. Controls how straight or bulged the tooth sides are. In degrees.
/// clearance = Gap between top of a tooth on one gear and bottom of valley on a meshing gear (in millimeters) /// clearance = Gap between top of a tooth on one gear and bottom of valley on a meshing gear (in millimeters)
/// backlash = Gap between two meshing teeth, in the direction along the circumference of the pitch circle /// backlash = Gap between two meshing teeth, in the direction along the circumference of the pitch circle
/// interior = If true, create a mask for difference()ing from something else. /// internal = If true, create a mask for difference()ing from something else.
/// valleys = If true, add the valley bottoms on either side of the tooth. Default: true /// valleys = If true, add the valley bottoms on either side of the tooth. Default: true
/// center = If true, centers the pitch circle of the tooth profile at the origin. Default: false. /// center = If true, centers the pitch circle of the tooth profile at the origin. Default: false.
/// mod = The metric module/modulus of the gear. /// mod = The metric module/modulus of the gear.
@ -1241,15 +1266,15 @@ function _gear_tooth_profile(
pressure_angle = 28, pressure_angle = 28,
clearance = undef, clearance = undef,
backlash = 0.0, backlash = 0.0,
interior = false, internal = false,
valleys = true, valleys = true,
center = false, center = false,
mod mod
) = let( ) = let(
pitch = is_undef(mod) ? pitch : pitch_value(mod), pitch = is_undef(mod) ? pitch : pitch_value(mod),
p = pitch_radius(pitch, teeth), p = pitch_radius(pitch, teeth),
c = outer_radius(pitch, teeth, clearance, interior), c = outer_radius(pitch, teeth, clearance, internal),
r = _root_radius(pitch, teeth, clearance, interior), r = _root_radius(pitch, teeth, clearance, internal),
b = _base_radius(pitch, teeth, pressure_angle), b = _base_radius(pitch, teeth, pressure_angle),
t = pitch/2-backlash/2, //tooth thickness at pitch circle t = pitch/2-backlash/2, //tooth thickness at pitch circle
k = -_gear_iang(b, p) - t/2/p/PI*180, //angle to where involute meets base circle on each side of tooth k = -_gear_iang(b, p) - t/2/p/PI*180, //angle to where involute meets base circle on each side of tooth
@ -1273,35 +1298,6 @@ function _gear_tooth_profile(
) pts2; ) pts2;
module _gear_tooth_profile(
pitch = 3,
teeth = 11,
pressure_angle = 28,
backlash = 0.0,
clearance = undef,
interior = false,
valleys = true,
center = false,
mod
) {
no_children($children);
pitch = is_undef(mod) ? pitch : pitch_value(mod);
r = _root_radius(pitch, teeth, clearance, interior);
fwd(r)
polygon(
points=_gear_tooth_profile(
pitch = pitch,
teeth = teeth,
pressure_angle = pressure_angle,
backlash = backlash,
clearance = clearance,
interior = interior,
valleys = valleys,
center = center
)
);
}
// Section: Computing Gear Dimensions // Section: Computing Gear Dimensions
// These functions let the user find the derived dimensions of the gear. // These functions let the user find the derived dimensions of the gear.
@ -1464,15 +1460,15 @@ function pitch_radius(pitch=5, teeth=11, mod) =
// Topics: Gears, Parts // Topics: Gears, Parts
// See Also: spur_gear(), diametral_pitch(), circular_pitch(), pitch_value(), module_value(), pitch_radius(), outer_radius() // See Also: spur_gear(), diametral_pitch(), circular_pitch(), pitch_value(), module_value(), pitch_radius(), outer_radius()
// Usage: // Usage:
// or = outer_radius(pitch, teeth, [clearance=], [interior=]); // or = outer_radius(pitch, teeth, [clearance=], [internal=]);
// or = outer_radius(mod=, teeth=, [clearance=], [interior=]); // or = outer_radius(mod=, teeth=, [clearance=], [internal=]);
// Description: // Description:
// Calculates the outer radius for the gear. The gear fits entirely within a cylinder of this radius. // Calculates the outer radius for the gear. The gear fits entirely within a cylinder of this radius.
// Arguments: // Arguments:
// pitch = The circular pitch, or distance between teeth around the pitch circle, in mm. // pitch = The circular pitch, or distance between teeth around the pitch circle, in mm.
// teeth = The number of teeth on the gear. // teeth = The number of teeth on the gear.
// clearance = If given, sets the clearance between meshing teeth. // clearance = If given, sets the clearance between meshing teeth.
// interior = If true, calculate for an interior gear. // internal = If true, calculate for an internal gear.
// mod = The metric module/modulus of the gear. // mod = The metric module/modulus of the gear.
// Example: // Example:
// or = outer_radius(pitch=5, teeth=20); // or = outer_radius(pitch=5, teeth=20);
@ -1482,15 +1478,15 @@ function pitch_radius(pitch=5, teeth=11, mod) =
// #spur_gear2d(pitch=5, teeth=11); // #spur_gear2d(pitch=5, teeth=11);
// color("black") // color("black")
// stroke(circle(r=pr),width=0.1,closed=true); // stroke(circle(r=pr),width=0.1,closed=true);
function outer_radius(pitch=5, teeth=11, clearance, interior=false, mod) = function outer_radius(pitch=5, teeth=11, clearance, internal=false, mod) =
let( pitch = is_undef(mod) ? pitch : pitch_value(mod) ) let( pitch = is_undef(mod) ? pitch : pitch_value(mod) )
pitch_radius(pitch, teeth) + pitch_radius(pitch, teeth) +
(interior? _dedendum(pitch, clearance) : _adendum(pitch)); (internal? _dedendum(pitch, clearance) : _adendum(pitch));
/// Function: _root_radius() /// Function: _root_radius()
/// Usage: /// Usage:
/// rr = _root_radius(pitch|mod, teeth, [clearance], [interior]); /// rr = _root_radius(pitch|mod, teeth, [clearance], [internal]);
/// Topics: Gears /// Topics: Gears
/// Description: /// Description:
/// Calculates the root radius for the gear, at the base of the dedendum. /// Calculates the root radius for the gear, at the base of the dedendum.
@ -1498,7 +1494,7 @@ function outer_radius(pitch=5, teeth=11, clearance, interior=false, mod) =
/// pitch = The circular pitch, or distance between teeth around the pitch circle, in mm. /// pitch = The circular pitch, or distance between teeth around the pitch circle, in mm.
/// teeth = The number of teeth on the gear. /// teeth = The number of teeth on the gear.
/// clearance = If given, sets the clearance between meshing teeth. /// clearance = If given, sets the clearance between meshing teeth.
/// interior = If true, calculate for an interior gear. /// internal = If true, calculate for an internal gear.
/// mod = The metric module/modulus of the gear. /// mod = The metric module/modulus of the gear.
/// Example: /// Example:
/// rr = _root_radius(pitch=5, teeth=11); /// rr = _root_radius(pitch=5, teeth=11);
@ -1508,10 +1504,10 @@ function outer_radius(pitch=5, teeth=11, clearance, interior=false, mod) =
/// #spur_gear2d(pitch=5, teeth=11); /// #spur_gear2d(pitch=5, teeth=11);
/// color("black") /// color("black")
/// stroke(circle(r=pr),width=0.1,closed=true); /// stroke(circle(r=pr),width=0.1,closed=true);
function _root_radius(pitch=5, teeth=11, clearance, interior=false, mod) = function _root_radius(pitch=5, teeth=11, clearance, internal=false, mod) =
let( pitch = is_undef(mod) ? pitch : pitch_value(mod) ) let( pitch = is_undef(mod) ? pitch : pitch_value(mod) )
pitch_radius(pitch, teeth) - pitch_radius(pitch, teeth) -
(interior? _adendum(pitch) : _dedendum(pitch, clearance)); (internal? _adendum(pitch) : _dedendum(pitch, clearance));
/// Function: _base_radius() /// Function: _base_radius()