Line Lisp

[christianbaileypaulsen1]

Im trying to create a lisp that creates a line right angle polyline that is pretty much and 1/16 offset of a corner. The line needs to be 1/2 inch, turn 90 degrees, then another 1/2 inch. I then tried to insert a rotate command so i can orientate the right angle to match the original corner. I will insert my code and a picture example. The red line is what im trying to draw via lisp. Its a very simple line and i usually copy it and then rotate it the way i need, i thought a lisp might be quicker though. Thank you everyone

 (defun c:sqout (/ startpoint)
 (setq startpoint (getpoint "Select Corner"))
 (command "._line" startpoint (1/2,0,0))
 (command "._line" startpoint (0,1/2,0))
 (command "._rotate" startpoint)
)

[Kent1Cooper]

---

@christianbaileypaulsen1 wrote:

It worked when i tried it. Do you mind if i use it for a couple of days and get back to you if any issues arise? That way i could put it under further testing and use it in many different applications. Again, thank you so much.

---

You're welcome, and by all means put it through its paces -- I would expect  you to come back if there are issues.  Whatever odd-ball conditions cause them may well be surmountable.