明经CAD社区's Archiver
社区
›
AutoLISP/Visual LISP 编程技术
› 1币求一个小功能,画方
feng83
发表于 2016-4-9 18:06:33
(defun c:rece (/ dz)
(command "RECTANG" pause pause)
(setq dz (entlast))
(command"CHANGE"dz"""P""C" "211" "lw" 60 ""))
feng83
发表于 2016-4-9 18:08:18
(defun c:ZFX (/ dz)
(command "RECTANG" pause pause)
(setq dz (entlast))
(command"CHANGE"dz"""P""C" "211" "lw" 60 ""))
页:
1
[2]
查看完整版本:
1币求一个小功能,画方