iroxusux 发表于 2022-7-5 23:20:33

修订云LISP例程

大家好。试图为正方形创建一个lisp例程，以便以后可以将其修改为用于修订云，因为我当前的CAD程序没有附带lisp例程。
 
RevCloud。lsp
 
功能不好
（XDIS）
（极性IP（DTR 90）（XDIS））
（SETQ P2（极性IP（DTR 90）（XDIS）））
（C:MYREVCLOUD）
 
这就是我遇到的问题。我对此很陌生，所以我只需要一些关于如何补救这种情况的建议。谢谢

MSasu 发表于 2022-7-5 23:39:04

XDI在代码中定义为变量，因此不能将其用作函数-只需删除括号即可：
(setq xdis (- x2 x1))
...
(setq p2 (polar ip (dtr 90.0) (xdis)))
顺便问一下，您使用的是什么版本的AutoCAD？我注意到您在代码中使用了BLIPMODE系统变量，这在相当长的一段时间内已经过时了。

iroxusux 发表于 2022-7-5 23:53:27

progeCAD。这太可怕了，我宁愿使用autodesk，但我的工作不能为我们提供autodesk/：

ReMark 发表于 2022-7-6 00:17:42

iroxusux：你能不能不要把基本相同的问题贴两次？你所做的会造成混乱，因为答案会在不同的线程之间出现分歧。请在将来考虑这一点。非常感谢。

BIGAL 发表于 2022-7-6 00:22:47

第二句话
页: [1]
查看完整版本: 修订云LISP例程