0 Members and 1 Guest are viewing this topic.
(prompt "\nSelect CLOSED Polyline: ")(while (not (setq ss (ssget ":e:s" '((0 . "LWPOLYLINE") (70 . 1)))))(prompt "\nSelected object NOT a closed Polyline.... "))
(PROMPT "\nSelect CLOSED Polyline: ")(WHILE (NOT (SETQ ss (SSGET ":e:s" '((0 . "LWPOLYLINE") (70 . 1))))) (PROMPT "\nSelected object NOT a closed Polyline.... "))(IF (SETQ ent (SSNAME ss 0)) (REDRAW ent 3))
(prompt "\nSelect CLOSED Polyline: ") (while (not (setq ss (ssget "_:E:S" '((0 . "LWPOLYLINE") (70 . 1)))) ) (prompt "\nSelected object NOT a closed Polyline.... ") ) (sssetfirst nil ss)