在三维环境中绘制矩形
亲爱的朋友们:,问候语
我试图在三维实体面上绘制一个矩形,我能够将ucs绘制到该面。但是当我给出第一个角点&相反的角点时,矩形是与我们的视图对齐的,而不是与ucs对齐的。
一旦我在这种情况下选择了点,它就会根据需要绘制到面上。
如何查看ucs的对角点。
请在这方面帮助我。
提前感谢
拉马纳 你能寄一个样品吗?“3D立体脸”有点矛盾-大卫 尊敬的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
带有选项面的ucs命令必须选择对象,而不是通过指定点。。
例如
(if (setq obj (car (entsel "\n Select object :")))
(command "_.ucs" "_face" obj "")
) 尊敬的Tharwat先生:,
感谢您的回复,
我的程序运行良好,但在指定矩形的第一个角点和相对角点时,该矩形显示出与ucs对齐。一旦我选择了相反的角落,然后它是绘制矩形与适当的尺寸和三维布尔正在发生。
我的问题是,在拾取矩形的第一个角点和相对角点时,这些点应与ucs对齐,以便更好地理解自定义。
拉马纳 如果我理解的很好,用你的代码替换这行代码。
(COMMAND "_.RECTANG" "_non" P1 "_non" P2)
页:
[1]