我需要1个简单的Lisp

vijoy · 发表于 2022-7-5 16:28:03

我需要一个简单的Lisp程序，

我已附上图纸文件
总之，我们可以提供A、B、F、G值。

“B”值将因每张图纸而异。根据这个，我需要画这个折线图

测试。图纸

RobDraw · 发表于 2022-7-5 16:41:16

如果你正在寻找一个LISP，你最好在LISP论坛上发布，但我认为一个动态块可以解决这个问题。

vijoy · 发表于 2022-7-5 16:57:27

我在找Lisp

RobDraw · 发表于 2022-7-5 17:02:58

是的，你说过。

还有其他方法。

你试过在LISP论坛上搜索吗？

SLW210 · 发表于 2022-7-5 17:10:41

我将你的帖子转移到AutoLISP、Visual LISP和DCL论坛。张贴在正确的论坛将帮助你获得适当的帮助。

David Bethel · 发表于 2022-7-5 17:19:55

你的样品与问题不太相符

假设所示角度是形状的基础：

如果G是常数，F的真值将是常数。F在X轴上的增量将发生变化

点E将围绕点A以及C和D旋转

你在找什么？

BIGAL · 发表于 2022-7-5 17:32:21

大提示寻找“在地面上绘制管道”或“在地面上绘制线”，我确信它存在。

%很简单，作为一名土木工程师，每天的高度差=长度*%/100.0。

此外，0.5直径不是垂直测量，而是平行于坡面线。然后可以根据线角度+-等计算出135角度

这是一个Lisp程序的问题，这将是一个很好的初学者来解决我认为它的数量的帖子Vijoy你开始了。所以有些帮助，但不是代码，粗体是lisp，请看一下这里的一些示例代码。

选取起点Getpoint
输入L&%直径
使用polar从起点计算出新的终点。
获取新线的角度
使用polar两次计算135度终点
使用pline pline pt1 pt2 pt3 pt4 C
由于有了这些点，现在可以在下一课的第二步中标记并标注尺寸。

保存此文件，然后可以使用“appload”或将其拖放到Autocad上。然后只需将下一行复制到命令行，嘿，前端就完成了。

copy


(ah:getval3 "Enter Length" 5 4 "Enter % " 5 4 "Enter dia" 5 4)

GETVALS。lsp

[编程交流] 我需要1个简单的Lisp

发表回复

精选推荐

浏览过的版块