网通访问 |电信访问 | 网络测速 | 联系管理员 |安全退出论坛,保护账号安全!
发新话题
打印

LISP反应器编写的图层自动切换程序(下载)

LISP反应器编写的图层自动切换程序(下载)

提供LISP反应器编写的图层自动切换程序下载,是几年前的作品了。
主程序为djcad_auto_layer.fas
程序的配置文件DJCAD_AUTO_LAYER.ini
依据当前用户使用的命令,如果在配置文件中有定义就会自动切换到对应的图层。
欢迎交流!
需要没有提示对话框的,请回贴或发邮件索取。
附件: 您所在的用户组无法下载或查看附件
你的进步就是我的成绩! 紧急问题请发Email:xmltc@163.com

TOP

如果图层不存在创建与0层相同配置的图层
Line Circl Arc Rectang四个绘图高频命令不列入切换
编辑工具条上的所有命令不列入切换
你的进步就是我的成绩! 紧急问题请发Email:xmltc@163.com

TOP

试试这个怎么样,其实我觉得顾文伟的那个最好使……

TOP

那个是ARX的作品,从程序与CAD的结合度特别是运行效率上会更好一些,但我这个程序小,并且谁都可以学会定类似的程序。
你的进步就是我的成绩! 紧急问题请发Email:xmltc@163.com

TOP

楼上的一个比一个NB !不过再过几年我也差不多了!

TOP

晕!全是乱码....有英文版的吗?
山外有山! 天外有天!

TOP

好像不怎么好用
!
一个人要有上进心,将来才会更好!

TOP

謝謝~~

TOP

(defun c:d5()
    (SETVAR "cmdecho" 0)
    (command "layer" "t" "d05a" "")
    (command "layer" "s" "d05a" "")
    (command "layer" "f" "*" "")
    (command "layer" "t" "d05a*,base*,border" "")
    (princ)
)
这是我的图层管理程序, d05a代表凹模板图层, base代表料带, border 代表图框图层,
敲D5把当前图层转成凹模板, 把其它无关图层全关掉; 用同样的办法可转到任意想要的图层.
前提是图层是要先设定好!
问世间模为何物,直教人以身相许!zhaomould@163.com

TOP

谢谢!我好象有点明白了!!

TOP

值得学习,我下了,谢谢楼主。
广交天下朋友

TOP

看看是个什么东东

TOP

相关资料太难找了,多谢指点

TOP

好東東好東東好東東好東東好東東
e-mail:coscos@21cn.com

TOP

程序的配置文件DJCAD_AUTO_LAYER.ini
觉得这个东西很需要。
设天下模具,奏时代强音。 QQ:43042925 MAIL:CONTINUE2002@163.COM

TOP

老大,我们需要你的金手指的。
设天下模具,奏时代强音。 QQ:43042925 MAIL:CONTINUE2002@163.COM

TOP

试试这个怎么样,其实我觉得顾文伟的那个最好使……

TOP

反应器这个东西太难,不敢动,楼主有一套

TOP

发新话题