brige2009 发表于 2011-8-3 22:36:24

求助高手编写一个轴倒角和孔倒角的程序

求教高手编写一个轴倒角和孔倒角的lisp程序，这个命令可以大大提高倒角的绘图速度，步骤和功能要求如下。多谢！命令:CHS1、选择轴第一条轮廓线:
此时十字光标变成拾取框，选择图中1线靠近A端的部分（如果选择靠近B端则在B端倒角）。2、选择另一条轴轮廓线: 选择图中2线靠近A端的部分，此时选中的线成虚点显示。1和2线必须是平行线，如果不是平行线的话，则提示“选择的线不平行，请重新选择”字样。3、输入倒角宽度<1.5>:1，默认为1.5，输入1，倒角宽度不能大于1线和2线距离的一半，否则提示重新输入倒角值。4、输入倒角角度<45.00>:默认为45°，倒角角度如下图所示倒角完成后，添加的线如下图中的红色线所示。所用的图层为粗实线01层，绘制的对象为炸开的单个实体。 孔倒角的话，同轴倒角步骤1、2、3、4一样，得到的结果如下图红线所示。所用的图层为粗实线01层，绘制的对象为炸开的单个实体。

Andyhon 发表于 2011-8-4 08:40:18

提供之前见过协力厂的作法
Run...
呈现样本图案,含各部位尺寸
依次在各尺寸位提示并接受User输入的尺寸值
(有一些值应是依手册规范,不须User介入)

图案呈见User输入的尺寸,确认后,自动绘出并标上尺寸....

brige2009 发表于 2011-8-5 20:05:42

各位大侠，给个思路也行
在此多谢了
共同努力

cabinsummer 发表于 2011-9-11 05:47:09

楼主用的程序可是InteCAD？

brige2009 发表于 2011-9-11 11:01:17

MDS
里面有一个这样的功能
我想把它移植到AutoCAD中来
希望大家出手相助

cabinsummer 发表于 2011-10-31 18:40:13

http://bbs.mjtd.com/thread-89955-1-1.html
我这个孔轴倒角可能和你要求的略微不一样，你要愿意可以拿去更改。

brige2009 发表于 2011-11-1 21:31:34

cabinsummer 发表于 2011-10-31 18:40 static/image/common/back.gif
http://bbs.mjtd.com/thread-89955-1-1.html
我这个孔轴倒角可能和你要求的略微不一样，你要愿意可以拿去更 ...

多谢指点！
页: [1]
查看完整版本: 求助高手编写一个轴倒角和孔倒角的程序