prny90 发表于 2022-7-6 10:55:07

用于存储p的AutoLisp程序

你好
我正试图编写一个lisp程序,以获得抛物线轮廓上每一毫米距离处点的坐标。这些点必须存储在一个文本文件中,以便它可以作为我的机器的输入。
 
请在这方面帮助我。

Tiger 发表于 2022-7-6 11:08:31

看看李的签名(如果你幸运的话,他会过来跟你打招呼),这可能会对你有所帮助。

alanjt 发表于 2022-7-6 11:18:15

http://www.cadtutor.net/forum/showthread.php?t=42954

Lee Mac 发表于 2022-7-6 11:32:56

谢谢大家,但我的点管理器只会做多边形顶点,因为曲线是相关的,所以我不确定它是否适合他的需要

alanjt 发表于 2022-7-6 11:45:07

只需使用Measure,然后导出点。

prny90 发表于 2022-7-6 11:48:19

谢谢大家,这项措施奏效了:-)

fixo 发表于 2022-7-6 12:02:33

使用measure,您将失去两个端点
试试这个:
(vl load com);;;==============================================;;(defun C:EXPOINTS(/*error*cnt datafile dimz en end filename obj param pt ptlist sset start step)(defun*error*(msg)(if datafile(close datafile))(if dimz(setvar“dimzin”dimz))(if msg(princ(strcat“\n错误!”msg)))(princ))(setq dimz(getvar“dimzin”))(setvar“dimzin”2);vla object en)leng(vla get length obj))(setq cnt-1 start 0)(而(
页: [1]
查看完整版本: 用于存储p的AutoLisp程序