Hey All, Wondering if someone can solve this for me
Simple backgroundmask not sure where i got it i forget.
Anyway to have this filter out anything in paperspace?
Thanks in advance!
(defun c:bkgndmask ()
(mleader-mask)
(mtxt-mask)
(princ)
)
(defun mleader-mask (/ ss i)
(if (setq ss (ssget '((0 . "MULTILEADER"))))
(repeat (setq i (sslength ss))
(setpropertyvalue (ssname ss (setq i (1- i))) "MText/BackgroundFill" 1)))
(princ)
)
(defun mtxt-mask ( / js n dxf_ent)
(setq js (ssget '((0 . "MTEXT"))))
(cond
(js
(repeat (setq n (sslength js))
(setq dxf_ent (entget (ssname js (setq n (1- n)))))
(entmod (append dxf_ent '((90 . 3) (63 . 256) (45 . 1.1) (441 . 0))))
)
)
)
(princ)
)