DijitalB 发表于 2022-7-6 08:24:31

AutoLISP编码的Dim文本

我制作了一个程序,可以从用户输入中绘制对象。我在下面提供了一个简单的示例,它将在对象上放置维度。在DIMLINEAR行之后,我希望能够编辑最后一个维度的文本,并具有下一(4)种可能性(我将根据需要独立使用,无需可选的条件提示):
 
1.\XABC~用于维度下的文本
2.ABC~用于标注后同一行上的文字
3.ABC~用于尺寸标注前同一行上的文字
4.ABC 4’-0”~用于添加文本和硬编码尺寸(替换实际尺寸)
 
(定义c:bdt()
(SETVAR“CMDECHO”0)
(SETQ STP(GETPoint“\n点击起点:”)
(SETQ P2(极性STP(*2 PI)5.0))
(SETQ P3(极性P2(*3(/π2))5.0))
(SETQ P4(极性P3 PI 5))
(命令行“STP P2 P3 P4 STP”)
(命令“DIMLINEAR”STP P4“@36.0
?
(普林斯)
)
 
我不认识任何VLisp,一直在搜索书籍和在线内容,只有类似的运气。我已经找到了提示用户选择维度的示例,但是,我希望程序在运行时创建和编辑每个维度。没有用户交互。
 
请使用我提供的代码帮助我了解(4)种不同的场景。请不要吹哨,这将超过我目前的经验水平。
 
谢谢你的帮助。
页: [1]
查看完整版本: AutoLISP编码的Dim文本