function to remove xrefs bases on status

[Carter]

I have an interesting problem that I'm trying to solve.

I need some sort of batch routine that will do the following to the xref's and images in a drawing based on their status:

Loaded: Leave alone

Unloaded: Remove from drawing

Unreferenced: Remove from drawing

Not found: Leave alone

Unresolved: Leave alone

Orphaned: Leave alone

 

At the moment I am able to remove all xref's that are Unloaded and Unreferenced through a lisp routine, but it also removes Not found, Unresolved and Orphaned. The problem being that I cannot differentiate between them. It treats Loaded the way I want.

 

Currently I am stumped as to how I can accomplish any of this for Images.

 

Any suggestions would be most welcome.

Thanks