mirror of
https://github.com/adrianschlatter/threadlib.git
synced 2025-08-15 23:34:32 +02:00
315d3b96fb
Enhancements =========== - Unified Inch Screw Threads Fixes =========== - PCO-1881 internal (minor diameter was too small) - Dpitch problem with G-ext threads Improvements =========== - developer docs - build system - unit tests - user does not need to rotate internal threads by 180 deg anymore to fit external thread !! Incompatibel changes !! ==================== We take the liberty to do this while the major version is still 0: - internal thread is rotated by 180 deg (see improvements). nut() and bolt() are not affected by this
62 lines
1.8 KiB
OpenSCAD
62 lines
1.8 KiB
OpenSCAD
/*
|
|
threadlib
|
|
+++++++++
|
|
|
|
Create threads easily.
|
|
|
|
:Author: Adrian Schlatter
|
|
:Date: 2019-11-11
|
|
:License: 3-Clause BSD. See LICENSE.
|
|
*/
|
|
|
|
function __THREADLIB_VERSION() = 0.3;
|
|
|
|
use <thread_profile.scad>
|
|
include <THREAD_TABLE.scad>
|
|
|
|
function thread_specs(designator, table=THREAD_TABLE) =
|
|
/* Returns thread specs of thread-type 'designator' as a vector of
|
|
[pitch, Rrotation, Dsupport, section_profile] */
|
|
|
|
table[search([designator], table, num_returns_per_match=1,
|
|
index_col_num=0)[0]][1];
|
|
|
|
module thread(designator, turns, higbee_arc=20, fn=120, table=THREAD_TABLE)
|
|
{
|
|
specs = thread_specs(designator, table=table);
|
|
P = specs[0]; Rrotation = specs[1]; section_profile = specs[3];
|
|
straight_thread(
|
|
section_profile=section_profile,
|
|
higbee_arc=higbee_arc,
|
|
r=Rrotation,
|
|
turns=turns,
|
|
pitch=P);
|
|
}
|
|
|
|
module bolt(designator, turns, higbee_arc=20, fn=120, table=THREAD_TABLE) {
|
|
union() {
|
|
specs = thread_specs(str(designator, "-ext"), table=table);
|
|
P = specs[0]; Dsupport = specs[2];
|
|
H = (turns + 1) * P;
|
|
thread(str(designator, "-ext"), turns=turns, higbee_arc=higbee_arc, fn=fn, table=table);
|
|
translate([0, 0, -P / 2])
|
|
cylinder(h=H, d=Dsupport, $fn=fn);
|
|
};
|
|
};
|
|
|
|
module nut(designator, turns, Douter, higbee_arc=20, fn=120, table=THREAD_TABLE) {
|
|
union() {
|
|
specs = thread_specs(str(designator, "-int"), table=table);
|
|
P = specs[0]; Dsupport = specs[2];
|
|
H = (turns + 1) * P;
|
|
thread(str(designator, "-int"), turns=turns, higbee_arc=higbee_arc, fn=fn, table=table);
|
|
|
|
translate([0, 0, -P / 2])
|
|
difference() {
|
|
cylinder(h=H, d=Douter, $fn=fn);
|
|
translate([0, 0, -0.1])
|
|
cylinder(h=H+0.2, d=Dsupport, $fn=fn);
|
|
};
|
|
};
|
|
};
|