AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |
Back to Blog
![]() (setq p1 (getpoint "\n Specify start point :")) (setq *y* (cond ((getdist (strcat "\n Specify Y segment :" (and (setq *x* (cond ((getdist (strcat "\n Specify X segment :" (defun c:PolyZag (/ a ang d l p1 p2 p3 p4) (l p (setq p (polar p ( a (setq i (- i))) y))) I use the Polylines for a welding signatures on Flatpattern drawings so the welder/Blacksmith knows were he have to weld the x lenght when he/she weld a If the user first give the user point 2 and then Point 1. If the user first give the user point 1 and then Point 2. Have to draw the Poly line like shown in the picture 2. If the user first give the user point 2 and the Point 1 then the lisp command Have to draw the Poly line like shown in the picture 1. ![]() If the user first give the user point 1 and the Point 2 then the lisp command The program the have to figure the out how to draw the Polyline, so i think it have to calculate the y length by it self. I am in a need for a lisp that can draw a specific polyline like shown below: ![]()
0 Comments
Read More
Leave a Reply. |