几何尺寸与公差论坛------致力于产品几何量公差标准GD&T (GDT:ASME)|New GPS(ISO)研究/CAD设计/CAM加工/CMM测量

几何尺寸与公差论坛------致力于产品几何量公差标准GD&T (GDT:ASME)|New GPS(ISO)研究/CAD设计/CAM加工/CMM测量 (http://www.dimcax.com/hust/index.php)
-   ObjectARX(AutoLISP) (http://www.dimcax.com/hust/forumdisplay.php?f=178)
-   -   怎样用lisp对两组直线进行倒圆角操作? (http://www.dimcax.com/hust/showthread.php?t=12039)

yang686526 2009-04-26 08:50 PM

怎样用lisp对两组直线进行倒圆角操作?
 
怎样用lisp对两组直线进行倒圆角操作?
www.dimcax.com
怎样用lisp对两组直线进行倒圆角操作?
如题

我也不太懂!
希望有人来普及一下!
技术员

图片:

图片:

我给你编一个程序它可对两组直线进行倒圆角,是原程序,
你把程序考到你的cad下解压为wdj.lsp.
在命令下用(load"wdj")回车就可使用,
在命令下输入wdj回车
提示:点倒角的内点:(回车用cad的fillet倒角),你在一组要倒角的线内点一个点,
提示:点倒角的外点:你在一组要倒角的线外点一个点.
提示:内r:你输入内r的值,回车,两个圆角就倒好了.
4
gbg

谢谢
我的程序是这样的:先后选择a、b两组空间直线,确定同一平面的直线(唯一的,即任意平面最多只有两条直线,而且这两条直线不同属于一个组)筛选出来,倒圆角,循环..
能用vba最好了


所有的时间均为北京时间。 现在的时间是 04:15 AM.