Mariusz Posted November 2, 2016 Share Posted November 2, 2016 Hi All My problem is to write correctly command function for (setvar "CHAMFERA" 2) (setvar "CHAMFERB" 2) (command "_chamfer" ...) (setq a (entget (ssname ss 0))) ;first line (setq x (cdr (assoc 10 a))) ;point of the first line ((-1 . ) (0 . "LINE") (330 . ) (5 . "76") (100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 . "0") (62 . 1) (100 . "AcDbLine") (10 0.0 428.416 0.0) (11 0.0 1872.0 0.0) (210 0.0 0.0 1.0)) (setq b (entget (ssname ss 0))) ;second line (setq y (cdr (assoc 10 b))) ;point of the second line ((-1 . ) (0 . "LINE") (330 . ) (5 . "73") (100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 . "0") (62 . 2) (100 . "AcDbLine") (10 0.0 1872.0 0.0) (11 1345.0 1872.0 0.0) (210 0.0 0.0 1.0)) (commond "_chamfer" x y "") it works (command "_chamfer" x y "") doesn't work How to write (command "_chamfer" ... [and write lines and points]) for automatically chamfer function? 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.