0 Members and 1 Guest are viewing this topic.
@Lee .. would something like this work as well?Code - Auto/Visual Lisp: [Select](defun _nested (bn / e) (and (setq e (tblsearch "block" bn)) (= 4 (logand 4 (cdr (assoc 70 e)))) (null (ssget "_X" (list '(0 . "insert") (cons 2 bn)))) ))
Quote from: ronjonp on January 24, 2020, 11:30:13 AM@Lee .. would something like this work as well?Code - Auto/Visual Lisp: [Select](defun _nested (bn / e) (and (setq e (tblsearch "block" bn)) (= 4 (logand 4 (cdr (assoc 70 e)))) (null (ssget "_X" (list '(0 . "insert") (cons 2 bn)))) ))Good suggestion Ron, but that could return false positives for unreferenced xrefs.