LSP
板混少年
工程地质测量国土规划
展开
-
AutoCAD Lisp LSP小程序 实现面积注记
(defun c:MJZJ()(if *error*(command "_boundary" (setq p1 (getpoint "\n点取要标注的封闭区域内部一点:")) ""))(setq EN (entlast))(command "area" "o" EN)(setq smj (getvar "area"))(setq imj smj)(setq smj (rtos smj 2 3))(setq smj (strcat "S=" smj "m2")) (if (= ht.原创 2022-04-02 15:18:28 · 1823 阅读 · 0 评论 -
CAD LISP 施工、规划设计点位的编号注记
CAD LISP 施工、规划设计点位的编号注记原创 2022-04-02 14:52:07 · 854 阅读 · 0 评论