[原创]：自己优化CAD及天正的部份命令。

[复制链接]

chenyizhen28

发表于 2009-12-27 17:13:48 | 显示全部楼层 |阅读模式

【广而告之】积分规则、D豆获取攻略 窝窝空间装扮攻略

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

;7 关屏闭框
(defun c:gbbg ()
(command "WipeOut" "F" "OFF" )
)

;8 开屏闭框
(defun c:sbbg ()
(command "WipeOut" "F" "on" )
)

;9 三点画圆

(defun c:c3 ()
(command "CIRCLE" "3p")
)

;10 二点画圆

(defun c:c2 ()
(command "CIRCLE" "3p")
)

;11 删除上一个选择集

(defun c:esc ()
(command "erase" "p")
)

;12 自定义拉伸

(defun c:scx ()
(command "STRETCH" "cp")
)

;13 移动上一个选择

(defun c:rdsc ()
(command "move" "p")
)

;14 格式上一个选择

(defun c:gssc ()
(command "MATCHPROP" "p")
)

;15 连接多断线

(defun c:bdx ()
(command "pedit" "m")
)

;16 旋转上次

(defun c:rsc ()
(command "ROTATE" "p")
)

;17 复制上次

(defun c:fzsc ()
(command "copy" "p")
)

;18 创建区域(多线)
(defun c:cqr ()
(command "-bo")
)

command, defun, 点画