明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
12
返回列表 发新帖
楼主: tranney

[源码] 几个二合一命令,是多位高手帮忙弄的,我只是拿出来给大家,希望大家喜欢

[复制链接]
发表于 2015-1-5 23:48 | 显示全部楼层
思路不错,学习了
发表于 2017-8-2 07:58 | 显示全部楼层
怎么切换的呢,需要自己输入ddd1的值??
发表于 2023-12-19 16:04 | 显示全部楼层
tranney大师好!您的这几个命令组合很好。我很喜欢第3个:

第3个,
;---------- 显示顺序 切换 开始
;---------- 通用2选1程序
(setq bbb1 1)
(defun c:hx()
(setq bbb1 (* bbb1 -1))
(if (> bbb1 0)  (c:qzwt)  (c:hzwt))
(princ)
)
(defun c:qzwt (/ ss)
(print "     调整显示顺序,前置物体")
(setq ss (ssget))
(command "DRAWORDER" ss "" "f")
)
(defun c:hzwt (/ ss)
(print "     调整显示顺序,后置物体")
(setq ss (ssget))
(command "DRAWORDER" ss "" "b")
)
;---------- 显示顺序 切换 结束

我运行后出现这样的问题:

命令: hx ; 错误: no function definition: C:HZWT

没有函数定义。我是小白,不知该如何解决,请大师指教,怎么处理这个问题,谢了
发表于 2023-12-21 08:16 | 显示全部楼层
昨天忘记告诉大师我的运行环境:
Win10版本, CAD2010版本。谢谢
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-7-3 08:31 , Processed in 0.154031 second(s), 18 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表