变暗文字替代

lamensterms · 发表于 2022-7-6 00:10:46

嗨Mircea，

哦，太酷了，我甚至没有意识到DIMLINEAR命令能够在插入时编辑标注文本。

这将进一步简化代码。

非常感谢你的提示。

Nobull84 · 发表于 2022-7-6 00:16:26

lamensterms，

这正是我需要的。简单明了。有一个初级问题，我可以根据自己的需要进行操作：如何在生成的维度中绘制两条线。例如，我有一个简单的“？”。但我想用“？”，然后开始新的一行，并有“D.E.”

感谢您迄今为止的帮助，

-诺布尔

*更新*

算出“\\P”

再次感谢您的代码

Nobull84 · 发表于 2022-7-6 00:22:24

以防万一有人想用这个。后来我修改了这个，以提示一个方形revcloud。最终结果是：

copy

(DEFUN C:D1 () (command ".dimstyle" "R" "[b]DIMSTYLE NAME HERE[/b]") (COMMAND "CLAYER" "[b]LAYER NAME HERE[/b]")
(setq ocmd (getvar "CMDECHO"))
(setvar "cmdecho" 1)
(command "dimlinear" pause pause pause)
(setvar "cmdecho" 0)
(command "dimedit" "n" "?" "L" "")
(setvar "CMDECHO" ocmd)
(COMMAND "CLAYER" "[b]LAYER NAME HERE[/b]")
(setq p1(getpoint "\nPick first corner of window: "))
       (setq p2(getcorner p1 "\nOpposite corner: "))
       (setvar "plinewid" 0)
       (command "rectang" p1 p2)
(command "REVCLOUD" "O" (entlast) "N")
(COMMAND "CLAYER" "0")
(PRINC)
)