openscad/dotSCAD
1
0
Fork 0
mirror of https://github.com/JustinSDK/dotSCAD.git synced 2025-08-31 02:10:28 +02:00
Code Issues Releases Wiki Activity

accept 3D point

Browse Source
This commit is contained in:
Justin Lin
2020-02-18 15:03:11 +08:00
parent 02fac4ea5c
commit 68234d6079
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
src/experimental/tf_sphere.scad
View File

@@ -10,13 +10,14 @@ function tf_sphere(size, point, radius, angle = [180, 360]) =
let( let(
x = point[0], x = point[0],
y = point[1], y = point[1],
z = is_undef(point[2]) ? 0 : point[2],
za = angle[0], za = angle[0],
xa = angle[1], xa = angle[1],
xlen = size[0], xlen = size[0],
ylen = size[1], ylen = size[1],
za_step = za / ylen, za_step = za / ylen,
rza = za_step * y, rza = za_step * y,
rzpt = [radius * cos(rza), radius * sin(rza), 0], rzpt = [(radius + z) * cos(rza), (radius + z) * sin(rza), 0],
rxpt = rotate_p(rzpt, [xa / xlen * x, 0, 0]) rxpt = rotate_p(rzpt, [xa / xlen * x, 0, 0])
) )
rxpt; rxpt;