MrNha Posted March 21, 2023 Share Posted March 21, 2023 (edited) I want file lisp copy object by object reference. BV.dwg Edited March 21, 2023 by MrNha 1 1 Quote Link to comment Share on other sites More sharing options...
rlx Posted March 21, 2023 Share Posted March 21, 2023 (edited) you mean like this??? (defun c:t1 ( / c i )(vl-load-com)(setq c (vlax-ename->vla-object (ssname (ssget "x" '((0 . "CIRCLE"))) 0)) i (vla-get-Center c))(mapcar '(lambda (p / o)(setq o (vla-copy c))(vla-move o i (vlax-3D-point p))) (mapcar 'vlax-curve-getstartpoint (mapcar 'cadr (ssnamex (ssget "x" '((0 . "LWPOLYLINE"))))))) Edited March 21, 2023 by rlx 1 Quote Link to comment Share on other sites More sharing options...
MrNha Posted March 24, 2023 Author Share Posted March 24, 2023 Thankyou so much! Quote Link to comment Share on other sites More sharing options...
MrNha Posted March 24, 2023 Author Share Posted March 24, 2023 I want file lisp boundary points of intersection! Quote Link to comment Share on other sites More sharing options...
BIGAL Posted March 24, 2023 Share Posted March 24, 2023 Post another dwg. Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.