Kerry
Sorry, it was my poor attempt at a joke...
Meaning that for me to write the tool I have in mind, I would have to go to another forum and ask my questions in order for me to come back and pass it off as my own (
which I would not do).
I am so sorry, it is hard to put humor into text when it is only understood in the mind of the one writing it. I was only trying to be funny and have a little fun, I did not mean to offend anyone.
That being said, here is the start of my idea, it's messy and very simplistic, right now. (In my head it is more grand)
(defun c:DigDeep ()
(setq
ent (entget (car (entsel "\nSelect Entity")))
entName "ENTITY NAME"
)
(textpage)
(mapcar 'print ent)
(setq code (getint "\nEnter Association Code "))
(setq code (entget (cdr (assoc code ent))))
(textpage)
(mapcar 'print code)
(princ)
)
My idea is to list only the Entity Name assoc. code, enter the desired entity code and get the next list of Entity Name assoc. codes
With an option to back out one level or two levels or three levels..., depending on how deep you already are and choose a different Entity Name assoc. code to go
a different direction. Sort of an exploring tool to find stuff.
Right now I am trying to figure out how to only list the Entity Name assoc. codes.