斜率/反转Lisp例程？

mcklem · 发表于 2022-7-6 12:23:41

我对编写lisp例程非常陌生，我想知道是否有人有类似的例程可以测量基于距离的斜率/反转类型计算。。。。。。这是为了确定建筑污水排放系统的仰拱高程，以便与土木工程师协调。

-它应该能够-

-询问用户起点
-询问用户起点标高（即-18“、-24”或-2”等）
-询问用户坡度百分比（即1/8”/英尺1/4”/英尺，1/16”/英尺
-询问用户下一点
-将两点之间的距离乘以斜率的百分比，并提供以下选项

-（结束运行/放置ie/下一点）默认为下一点
-结束运行将停止命令并放置计算的反转高程。（文本）在用户选择的点。
-下一个点将继续该命令，并添加所有选定点之间的总距离，并在拾取每个点后循环选项。

然后，如果有办法将fianl仰拱高程转换为以下多行文字格式，即=XX'-XX“B.F.F.（仰拱高程=竣工地面以下英尺英寸）。

我知道这有很多问题要问，但我想如果我把它画出来，可能会生成一些类似的lisp例程，我可以参考这些例程，以获取关于如何编写它的想法和帮助。

P、它可以使用poly-line命令从点到点绘制一条线。