"_none" (vlax-curve-getPointAtParam ent (if pl 1.5 (/ pi 2))) "_none" (vlax-curve-getPointAtParam ent (if pl 2.5 pi)) "" "_none" (vlax-curve-getPointAtParam ent (if pl 0.5 0)) Pl (= (cdr (assoc 0 (entget ent))) "LWPOLYLINE") is a Polyline Try this : (defun C: CHRCE = Cross- Hairs in Rectangles, Circles, Ellipses Tool Bar Lisp Routine Adjustment Help 1.MTEXT command and justification options 1.LISP - Lee Mac's List Box DCL Routine 3.
0 Comments
Leave a Reply. |
Details
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |