新手求高人指点！面域交集和面域沿路径拉伸问题
本帖最后由 臣做不到啊 于 2015-8-16 18:24 编辑初学lisp尝试用lisp编写一个自动绘制斜齿轮的程序，出问题的代码如图一。我对齿顶圆形成的面域和之前齿形面域ss4做交集，结果没有实现如图4，正确结果是如图2，（昨天的时候还能完成的，今天突然就不能了）结果拉伸后出现如图3。是不是图元集出了问题？还有个问题就是我单独使用齿形沿z方向上的路径拉伸时程序也实现不了，手动却可以。求各位前辈指点一下！万分感谢
有问题的部分代码：
(command "mirror" ss1 "" p0 p2 "" "");将刚绘制的轮廓线镜像
(command "region" ss1 (entlast) "")
(setq ss2 (entlast))
(command "view" "right" "")
(setq py (/ w (cos lxj))
p4 (polar p0 (- 90 lxj) py)
)
(command "line" p0 p4 "")
(setq f2 (entlast))
(command "view" "top" "")
(command "circle" p0 rf "")(command "region" (ssget "L") "")
(setq ss3 (entlast))
(command "subtract" ss2 "" ss3 "")
(setq ss4 (entlast))
(command "circle" p0 ra "")(command "region" (ssget "L") "");绘制齿顶圆面
(command "intersect" ss4 (entlast) "")
(command "extrude" (entlast) "" "p" f2 "");拉伸
(command "shademode" "g" "");设置成“体着色”
(command "view" "seiso");视图 在线等。。。吃个晚饭回来继续等 贴图干啥？ 贴出代码呀 lucas_3333 发表于 2015-8-16 17:48 static/image/common/back.gif
贴图干啥？ 贴出代码呀
原来是把代码截图了。。。有重发了一边代码。。。 自顶。。。。同样的代码昨天下午完美运行，今天下午就出错了一部分，现在晚上完全错了。。。代码我动都没有动。。。。捕捉也没问题真是想不通。。。求大神 臣做不到啊 发表于 2015-8-16 20:34 static/image/common/back.gif
自顶。。。。同样的代码昨天下午完美运行，今天下午就出错了一部分，现在晚上完全错了。。。代码我动都没有 ...
看你这个代码完全是休力活啊，你干嘛不贴出完整的代码，贴这几句，叫人如何帮助你？ lucas_3333 发表于 2015-8-16 20:53 static/image/common/back.gif
看你这个代码完全是休力活啊，你干嘛不贴出完整的代码，贴这几句，叫人如何帮助你？
我找到问题啦，已经解决了。谢谢~
页:
[1]