求助大神！怎么把两条线的高差画成一根竖线体现出来

l429677287 · 发表于 12 小时前

wzg356 发表于 2025-5-12 22:18
把长度。高程找出来展线
(defun c:tt66( / d e p0 ps ps1)
(princ"\按顺序选取直线:")

好像不得呢

jun470 · 发表于 12 小时前

是要以标高的文字作为高差，画剖面啊，表达不清晰。然后这样还涉及比例问题，不同比例下这条线长度不一样，然后作为低处的图形还要移动，这个使用频次不高的画，手动移动吧

l429677287 · 发表于 11 小时前

jun470 发表于 2025-5-13 09:21
是要以标高的文字作为高差，画剖面啊，表达不清晰。然后这样还涉及比例问题，不同比例下这条线长度不一样， ...

是的，感谢回复。因为工作需要，这个使用频率对我来说还是挺高的，有没有相关的代码呢？非常感谢

xyp1964 · 发表于 8 小时前

;; 非源码，慎重下载

linzaijie · 发表于 7 小时前

好功能...学习了................

l429677287 · 发表于 5 小时前

xyp1964 发表于 2025-5-13 12:56
;; 非源码，慎重下载

哇，感谢！怎么赠送明经币

l429677287 · 发表于 5 小时前

xyp1964 发表于 2025-5-13 12:56
;; 非源码，慎重下载

大神你好，为什么运行不了呢？我是CAD2018

l429677287 · 发表于 5 小时前

本帖最后由 l429677287 于 2025-5-13 16:14 编辑

xyp1964 发表于 2025-5-13 12:56
;; 非源码，慎重下载

如图，显示错误: no function definition: UDIST

杜阳 · 发表于半小时前

l429677287 发表于 2025-5-13 16:04
如图，显示错误: no function definition: UDIST

院长的代码是部分代码还有他自定义函数缺少自定义函数

账号		自动登录	找回密码
密码			注册

[源码] 求助大神！怎么把两条线的高差画成一根竖线体现出来