Ramana 发表于 2022-7-6 08:12:35

在三维环境中绘制矩形

亲爱的朋友们:,
 
问候语
 
我试图在三维实体面上绘制一个矩形,我能够将ucs绘制到该面。但是当我给出第一个角点&相反的角点时,矩形是与我们的视图对齐的,而不是与ucs对齐的。
 
一旦我在这种情况下选择了点,它就会根据需要绘制到面上。
 
如何查看ucs的对角点。
 
请在这方面帮助我。
 
提前感谢
 
拉马纳

David Bethel 发表于 2022-7-6 08:32:21

你能寄一个样品吗?“3D立体脸”有点矛盾-大卫

Ramana 发表于 2022-7-6 08:45:17

尊敬的David:,
 
谢谢你的回复,请找到这两个图像和代码,我开发的布尔运算在一个固体。

(DEFUN C:window()
(SETQ FACE(GETPOINT "PICK A POINT ON THE FACE"))
(COMMAND "ucs" "F" FACE "")
(SETQ W(ENTLAST))
(SETQ P1(GETPOINT "START PT OF WINDOW")
   P2(GETCORNER P1 "OPP OF WINDOW"))
(TRANS P2 1 1)
(COMMAND "RECTANG" P1 P2)
(SETQ W1(ENTLAST))
(COMMAND "EXTRUDE" W1 "" -200)
(SETQ W2(ENTLAST))
(COMMAND "SUBTRACT" W "" W2 "")
(princ)
);defun

Tharwat 发表于 2022-7-6 08:55:23

带有选项面的ucs命令必须选择对象,而不是通过指定点。。
例如
(if (setq obj (car (entsel "\n Select object :")))
(command "_.ucs" "_face" obj "")
)

Ramana 发表于 2022-7-6 09:04:08

尊敬的Tharwat先生:,
 
感谢您的回复,
 
我的程序运行良好,但在指定矩形的第一个角点和相对角点时,该矩形显示出与ucs对齐。一旦我选择了相反的角落,然后它是绘制矩形与适当的尺寸和三维布尔正在发生。
 
我的问题是,在拾取矩形的第一个角点和相对角点时,这些点应与ucs对齐,以便更好地理解自定义。
 
拉马纳

Tharwat 发表于 2022-7-6 09:22:35

如果我理解的很好,用你的代码替换这行代码。
 

(COMMAND "_.RECTANG" "_non" P1 "_non" P2)

页: [1]
查看完整版本: 在三维环境中绘制矩形