示例：压力容器有哪些不同类型的封头？
你好
碟形封头类型
1、双曲面碟形端
2.2:1椭球碟形端
3、半球碟形端
谢谢你的回复
再见
manikya rao
印度的 您好，我是新使用lisp代码的人，有人能告诉我如何在cad中使用这个lisp吗
; 将度转换为弧度
（defun DTR（D）
（/（*pi D）180.0）
);DTR结束
（defun C:DISH（）
;用户输入
（setq CEN（getpoint“\n输入容器中心点：”）
（setq DIA（getreal“\n输入容器直径（DIA）：”）
（setq IKR（getreal“\n输入内转向节半径（IKR）：”）
; 获取转向节半径的点
（setq DIA2（/DIA 2））
（setq PT1（极性CEN（DTR 180）DIA2））
（setq PT2（极性PT1（DTR 0）IKR））
（setq PT3（极性PT2（DTR 120）IKR））
（setq PT4（极性CEN（DTR 0）DIA2））
（setq PT5（极性PT4（DTR 180）IKR））
（setq PT6（极性PT5（DTR 60）IKR））
; 画盘子
（命令“ARC”PT3“C”PT2 PT1）；弧起点/中心/终点
（命令“ARC”PT4“C”PT5 PT6）；弧起点/中心/终点
（命令“ARC”PT6“E”PT3“R”DIA）；圆弧起点/终点/半径
);盘子的末端 纳沙：
欢迎来到论坛。
除了附加到上一个问题的末尾之外，你还应该考虑发布你的问题。这样你会得到更多的回复。 嘿，第一次贴海报，但长期跟踪。我有基本的lisp经验。我正在寻找一个类似的Lisp程序这个只有几个不同之处。我附上了两张图片，1（之前）显示了lisp生成的内容，2（之后）显示了我希望修改它的目的。基本上，我只需要画一半的油箱盖，根据用户定义的长度从较大圆弧的中点向下画一条线，然后插值其他2条线。如果这不够清楚，请原谅我，让我知道，我会尽力澄清。
之后pdf
之前）。pdf 遵循LSR代码并进行以下修改：
要获得较大弧的一半，请使用3点弧（SSE），而不是LSR从pt3到pt6使用的（SER）。要获得弧的中点或第二个点，请使用“从中心点定义坦克头部的深度”。从那里使用break命令删除一半弧，弧的中点作为第一个点，pt6作为第二个点。
你需要在pt2下再取一个点来画一条线。
其余与LSR代码相同。
我希望我清楚了。
编辑：我应该说pt1不是pt2。 谢谢t2l的回复，我完全明白你的意思，我只是无法正确编写代码。在这一点上，让我强调一下“Lisp程序新手”。有什么想法吗？ 为了测试LSR代码，您必须提供数字或示例，就像启动此线程的人一样；否则就像在黑暗中射击。 尊敬的先生：，
我学习自动LISP plz帮助我
我在auto cad中制造压力容器
是否可以编写一个AutoLisp例程，该例程将要求用户输入变量，如外壳id、厚度、长度、关节半径、复曲面角度等，然后生成立面图和端视图
（或标高和平面图，取决于其是水平容器还是垂直容器）是否适用于同一容器？
请帮帮我
我的电子邮件是waqasazam89@hotmail.com
WAQAS AZAM公司 Waqas Azam：欢迎来到CADTutor论坛。这篇文章的最后一篇帖子是一年多前写的。我可以建议您在AutoLISP/VBA论坛中以新的帖子形式发布您的问题吗？此外，在公共论坛上发布个人的私人电子邮件地址从来都不是一个好主意。非常感谢。
页:
1
[2]