nest1291 Posted July 17, 2018 Share Posted July 17, 2018 I have a question. dear. like pic. would provide like this lisp . Quote Link to comment Share on other sites More sharing options...
nest1291 Posted July 17, 2018 Author Share Posted July 17, 2018 (edited) ==== I have this lisp now. ====== (defun C:BB(/ ss sno pt1 pt2 no x) (princ " = BREAK2P") (setq ss (ssget)) (setq sno (sslength ss)) (setq pt1 (getpoint "\n>>> First Point : ")) (setq pt2 (getpoint pt1 "\n>>> Second Point : ")) (setq no 0) (repeat sno (setq x (ssname ss no)) (command "break" x pt1 pt2) (setq no (1+ no)) )(prin1) ) Edited July 18, 2018 by nest1291 Quote Link to comment Share on other sites More sharing options...
SLW210 Posted July 17, 2018 Share Posted July 17, 2018 Please read the Code Posting Guidelines and have your Code to be included in Code Tags.[NOPARSE] Your Code Here[/NOPARSE] = Your Code Here Quote Link to comment Share on other sites More sharing options...
Roy_043 Posted July 17, 2018 Share Posted July 17, 2018 Try BreakObjects22.LSP by CAB @ theswamp.org Topic: https://www.theswamp.org/index.php?topic=10370.0 Download link: https://www.theswamp.org/index.php?topic=10370.msg586841#msg586841 Quote Link to comment Share on other sites More sharing options...
nest1291 Posted July 18, 2018 Author Share Posted July 18, 2018 thank you. I was changed. thank you. 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.