先进者 发表于 2012-3-11 13:55:09

帮忙编写一个小lisp程序

本帖最后由 先进者 于 2012-3-13 18:09 编辑

请帮忙编写一个小lisp程序,如何框选修改选定对象a层上的图元为1号色
                                                         b层上的图元为2号色
                                                         c层上的图元为3号色,
                                                          最好附带删除文字和尺寸的语句.


附件为例子

在线等待

不知道在哪里设置悬赏,
愿意画10个明经币购买程序

Andyhon 发表于 2012-3-11 20:03:24

请附上 运行前的图样本(*.Dwg) & 运行后的完工图样本(*.Dwg)

...重新加载一下就可以了...
有可能定义的函式被覆载所衍生...

chpmould 发表于 2012-3-11 20:11:28

自己先试着写写吧,直接获取对象层->修改颜色...

先进者 发表于 2012-3-12 10:42:52

Andyhon 发表于 2012-3-11 20:03 static/image/common/back.gif
请附上 运行前的图样本(*.Dwg) & 运行后的完工图样本(*.Dwg)

...重新加载一下就可以了...


附件已经添加到主题哪里去了,请帮忙,谢谢

Andyhon 发表于 2012-3-12 11:58:33

您是从事线割工作?
自家图文件 or 来自客户?

先进者 发表于 2012-3-12 12:01:23

Andyhon 发表于 2012-3-12 11:58 static/image/common/back.gif
您是从事线割工作?
自家图文件 or 来自客户?

我是从事五金模具设计的,因为经常要叠图检查,很麻烦,所以请你帮忙搞下,我删除了很多东西,只是想把意思说明白,

Andyhon 发表于 2012-3-12 12:16:04

目的是要查验上孔不对下孔的问题吗?
另纯AutoCAD原始环境或藉由套装软体

先进者 发表于 2012-3-12 12:23:21

本帖最后由 先进者 于 2012-3-12 12:27 编辑

Andyhon 发表于 2012-3-12 12:16 http://bbs.mjtd.com/static/image/common/back.gif
目的是要查验上孔不对下孔的问题吗?
另纯AutoCAD原始环境或藉由套装软体

是的,还有想检查孔少不少的问题


"另纯AutoCAD原始环境或藉由套装软体"

这句话没明白什么意思

先进者 发表于 2012-3-12 12:29:19

Andyhon 发表于 2012-3-12 11:58 static/image/common/back.gif
您是从事线割工作?
自家图文件 or 来自客户?

自家图文件

Andyhon 发表于 2012-3-12 12:41:23

那么建议您改用自订不同长度的标准模板来套用
这样 内外导柱;镙丝孔..... 就自然对齐了
也就是完成核心设计之后再依所需长度来插入对映长度的标准模板
页: [1] 2 3 4
查看完整版本: 帮忙编写一个小lisp程序