def make_sphere b^0}}12
p_gp=gp_head =O).Lx2J
loop while p_gp#null g%[c<l9
;获取节点点坐标值:P=(px,py,pz) P!G858V(
px=gp_xpos(p_gp) #_93f
|
py=gp_ypos(p_gp) 0Hxmm@X2
pz=gp_zpos(p_gp) Gf EX>
dist=sqrt(px*px+py*py+pz*pz) 7!WA)@6
if dist>0 then T .FI'wy
;节点位置调整 c yyVg!+
maxp=max(px,max(py,pz)) vw,rF`LjZ
k=(maxp/rad)*(rad/dist) 7&qy5y-Ap
gp_xpos(p_gp)=k*px p Z: F:
gp_ypos(p_gp)=k*py Jg}K.1Hs
gp_zpos(p_gp)=k*pz Ej".axjT
end_if T~0k"uTE
p_gp=gp_next(p_gp) W2FD+ wt
end_loop "pP^*9FrA
end _tTN G2
make_sphere ~`M\Ir
输入上述程序后出现“trying to divide by zero"是怎么回事?rad为10.0