openscad/dotSCAD
1
0
Fork 0
mirror of https://github.com/JustinSDK/dotSCAD.git synced 2025-03-14 11:10:01 +01:00
Code Issues Releases Wiki Activity

supported r1 = 0 or r2 = 0

Browse Source
This commit is contained in:
Justin Lin 2017-05-15 10:31:06 +08:00
parent b4aef1195a
commit fd2acd3a36
1 changed files with 41 additions and 22 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

63
src/__private__/__half_trapezium.scad
View File

@ -1,37 +1,56 @@
function __tr_corner(frags, l1, l2, h, round_r) =
let(
t_sector_angle = atan2(h, l1 - l2),
t_leng = l2 - round_r * tan(t_sector_angle / 2),
t_round_frags = frags * t_sector_angle / 360,
half_h = h / 2
)
[
for(pt = __pie_for_rounding(round_r, 90 - t_sector_angle, 90, t_round_frags))
[pt[0] + t_leng, pt[1] + h - round_r - half_h]
function __tr__corner_t_leng_lt_zero(frags, t_sector_angle, l1, l2, h, round_r) =
let(t_height = tan(t_sector_angle) * l1 - round_r / sin(90 - t_sector_angle) - h / 2)
[
for(pt = __pie_for_rounding(round_r, 90 - t_sector_angle, 90, frags * t_sector_angle / 180))
[pt[0], pt[1] + t_height]
];
function __br_corner(frags, l1, l2, h, round_r) =
let(
b_ang = atan2(h, l1 - l2),
b_sector_angle = 180 - b_ang,
b_leng = l1 - round_r / tan(b_ang / 2),
b_round_frags = frags * b_sector_angle / 360,
b_end_angle = -90 + b_sector_angle,
half_h = h / 2
)
function __tr_corner_t_leng_gt_or_eq_zero(frags, t_sector_angle, t_leng, h, round_r) =
let(offset_y = h / 2 - round_r)
[
for(pt = __pie_for_rounding(round_r, -90, b_end_angle, b_round_frags))
for(pt = __pie_for_rounding(round_r, 90 - t_sector_angle, 90, frags * t_sector_angle / 360))
[pt[0] + t_leng, pt[1] + offset_y]
];
function __tr_corner(frags, b_ang, l1, l2, h, round_r) =
let(t_leng = l2 - round_r * tan(b_ang / 2))
t_leng >= 0 ?
__tr_corner_t_leng_gt_or_eq_zero(frags, b_ang, t_leng, h, round_r) :
__tr__corner_t_leng_lt_zero(frags, b_ang, l1, l2, h, round_r);
function __tr__corner_b_leng_lt_zero(frags, b_sector_angle, l1, l2, h, round_r) =
let(
reversed = __tr__corner_t_leng_lt_zero(frags, b_sector_angle, l2, l1, h, round_r),
leng = len(reversed)
)
[
for(i = [0:leng - 1])
let(pt = reversed[leng - 1 - i])
[pt[0], -pt[1]]
];
function __br_corner_b_leng_gt_or_eq_zero(frags, b_sector_angle, l1, l2, b_leng, h, round_r) =
let(half_h = h / 2)
[
for(pt = __pie_for_rounding(round_r, -90, -90 + b_sector_angle, frags * b_sector_angle / 360))
[pt[0] + b_leng, pt[1] + round_r - half_h]
];
function __br_corner(frags, b_ang, l1, l2, h, round_r) =
let(b_leng = l1 - round_r / tan(b_ang / 2))
b_leng >= 0 ?
__br_corner_b_leng_gt_or_eq_zero(frags, 180 - b_ang, l1, l2, b_leng, h, round_r) :
__tr__corner_b_leng_lt_zero(frags, 180 - b_ang, l1, l2, h, round_r);
function __half_trapezium(length, h, round_r) =
let(
is_vt = __is_vector(length),
l1 = is_vt ? length[0] : length,
l2 = is_vt ? length[1] : length,
frags = __frags(round_r),
br_corner = __br_corner(frags, l1, l2, h, round_r),
tr_corner = __tr_corner(frags, l1, l2, h, round_r)
b_ang = atan2(h, l1 - l2),
br_corner = __br_corner(frags, b_ang, l1, l2, h, round_r),
tr_corner = __tr_corner(frags, b_ang, l1, l2, h, round_r)
)
concat(
br_corner,