ylind Posted August 9, 2008 Share Posted August 9, 2008 some time ago I had a Toolbar button that would allow me to pick a LINE, Change it to a polyline and change it to a set width. Something like this; (Command: pedit "y" "w" "0.5") but this don't work. Can anyone help? A lisp routine might also work. T.I.A. y.L Quote Link to comment Share on other sites More sharing options...
alanjt Posted August 9, 2008 Share Posted August 9, 2008 here, this is a real simple routine i use to quickly join plines, lines, arcs. i modified it to set the width instead of joining. you can change the title, and whatever else you don't like. ;join multiple lines/arcs ;created: alan thompson, 4.23.08 ;modified: alan thompson, 5.13.08 (localized variables to stop being so sloppy) (defun c:mj(/ lines) (princ "\nSelect lines & arcs to JOIN: ") (setq lines (ssget '((0 . "*LINE,ARC")))) (if lines (progn (if (equal (getvar 'peditaccept) 1) (command "pedit" "m" lines "" "w" "0.5" "") (command "pedit" "m" lines "" "y" "w" "0.5" "") );if );progn (alert (strcat "\nHey " (getvar "loginname") " it helps if you actually select something to work with!")) );if (princ) ) 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.