Hoi,
Is er een mogelijkheid om meerdere rectangles (closed polylines) tegelijk om te zetten naar wipeouts?
Ik heb op het wereldwijde web een hiervoor een lisp gevonden, maar blijkbaar werkt deze niet.
Kan iemand mij hierbij helpen?
Lispje in bijlage.
Alvast bedankt,
Jochen
Vervang:
(setq sset (ssget '((0 . "LWPOLYLINE") (-4 . ""))))
Door:
(setq sset (ssget '((0 . "LWPOLYLINE") (-4 . "&") (70 . 1) (-4 . "<NOT") (-4 . "/=") (42 . 0.0) (-4 . "NOT>"))))
En verwijder 'rs' aan het eind van de laatste regel.
Roy,
TOP!
Bedankt Roy!
Werkt perfect! :vreegoe: