社区 › Auto Lisp › 如何。。。图案填充或实体。。。

koletutor 发表于 2022-7-6 08:05:34

如何。。。图案填充或实体。。。

你好
 
我创建了这个小lisp，用于在拾取的圆内绘制“年轻月亮”形状的两条弧。现在我需要你的帮助来教我如何孵化或实体填充那个区域。。。
 
非常感谢您的帮助。

MSasu 发表于 2022-7-6 08:23:59

可以从这些圆弧创建多段线，并对其调用HATCH命令：
(command "_PEDIT" entityArc1st "" "_J" entityArc2nd ""
      "_HATCH" "_P" "SOLID" "_S" (entlast) "" "")
当做
米尔恰

koletutor 发表于 2022-7-6 08:31:03

谢谢Miricea的回复。
 
我也喜欢你的方法（我也这么想），但我不知道如何在pedit命令后“调用”弧来加入它们。。。。我试图在定义第二个弧后放入您的代码，但收到了一些错误消息。。。。
 
也许你认为我应该（不）那样做

MSasu 发表于 2022-7-6 08:45:00

ENTMAKEX函数将返回实体的名称：

;    (progn
    (setq entityArc1st
   (entmakex
      (list (cons 0 "ARC")
       (cons 10cp)
       (cons 40r1)
       (cons 50 (* 3 (/ pi 2)))
       (cons 51 (/ pi 2))
      );end list
   );end entmakex
    )
;    )end progn
此外，不需要这些程序。
 
当做
米尔恰

koletutor 发表于 2022-7-6 08:47:11

再次感谢米尔恰的帮助和教训。

MSasu 发表于 2022-7-6 08:56:05

不客气！
那么，你的日常生活安排安排得怎么样了？
 
当做
米尔恰

koletutor 发表于 2022-7-6 09:14:32

是的，米尔恰，在你的大力帮助下，我成功地完成了这一例行程序，现在看起来是这样的：
 
3
 
再次感谢你教会了我很多。

查看完整版本: 如何。。。图案填充或实体。。。