请给我小费

BlackAlnet · 发表于 2022-7-6 14:27:20

嗨，又是我。。。我很沮丧，再次来到这里。。。但是我有一件简单的事要做，我不知道该怎么做，或者，出了什么问题。。。

我希望有一天，来这里提供答案，而不仅仅是问题。。。现在我有一个问题。。。

我有一个实体“po”，它是一个实体，由“-boundary”命令生成。我想使用“area”命令，并获取实体“po”的坐标，用于设置区域。。。我怎么能把它写好？？

copy

    (setq p (getpoint "\n Selecione area a extrair: "))
    (command "-boundary" p "")
    (setq po (entget (entlast)))
    (entmod po)
    (command "area" (list po) "")
    (setq area (getvar "area"))
    (setq arealst (cons area arealst))

PS:Sry英语不好，谢谢你的帮助

Lee Mac · 发表于 2022-7-6 14:43:59

由于您只要求提供提示，我不会重新编写您的LISP，而是为您指出正确的方向：

返回要与Area命令一起使用的实体名（ename）。

不需要获取Entget数据。。。

此外，您不需要将“list”与Area命令一起使用，您不是为其提供列表，而是为其提供实体名称

BlackAlnet · 发表于 2022-7-6 14:49:03

谢谢李，你帮了我“很多”，很多时候，我非常感激！！！

现在，它工作正常，是的，xD！！！我很高兴，yuhul

copy

Lee Mac · 发表于 2022-7-6 15:00:44

杰出的

当你自己找到答案时会更好，这样你会学到更多

很乐意帮忙，

李

BlackAlnet · 发表于 2022-7-6 15:10:05

是的，我不想那个论坛成为我的“Lisp程序制造者”。我只想要一些提示，以及任何可以帮助我越来越多地了解lisp的人

Lee Mac · 发表于 2022-7-6 15:12:09

你读过关于这些函数的帮助文章吗？它们包含了大量关于如何使用它们的信息

您是否使用Visual LISP编辑器生成代码？

BlackAlnet · 发表于 2022-7-6 15:26:22

我正在阅读“afralisp”，以及visual lisp编辑器中的教程。我也在使用visual lisp。

现在在我的工作中，我只写LISP，简单的LISP。我总是从互联网上获取一个lisp，然后修改它来做我想让lisp做的事情。这是我的Lisp程序，我从一开始就写

我想通过“错误捕捉”来提高我的知识，并制作更好的LISP

Lee Mac · 发表于 2022-7-6 15:31:29

啊好的

[编程交流] 请给我小费

发表回复

精选推荐