Any lisp to reload only "loaded" xrefs

[JeepMaster]

We're using ADT 2004. I wanted to know if there's an easier way to reload "loaded" xrefs. The only way that I know is open xref manager and pick all the xrefs that I want to reload and click the reload button. This is getting cumbersome as people at work are saving their xrefs every minute. I constantly have to reload the xrefs. The problem I have is there are loaded and unloaded xrefs in my dwg, so I can't use [-xref r *]. Does any body know a lisp that reloads all the loaded xrefs? Someone must have addressed this before. Please help.

[ASMI]

It's as toggle switch... type UNRELOAD and XRefs unloads, press Enter or agan type UNRELOAD xrefs loads.

(defun c:unreload(/ cObj cName)
  (setq cObj(tblnext "BLOCK" T))
  (while cObj
    (setq cName(cdr(assoc 2 cObj)))
      (vl-cmdf "_.xref" (if(=(logand(cdr(assoc 70 cObj))32)32)
               "_unload" "_reload") cName)
  (setq cObj(tblnext "BLOCK"))
  ); end while
   (princ)
  ); end of c:unreload

[JeepMaster]

Thanks ASMI, but I don't follow how your lisp can help me here. I'm trying to reload all the xrefs on my dwgs that already loaded and ignore all the xrefs that's not loaded. I've tried your lisp but it only reverse the xrefs status. (ie: unload the loaded xrefs and load the unloaded xrefs) I'm trying to basically refresh my dwg with the same loaded xrefs and keep the unloaded xrefs unloaded. Unless I'm missing some steps I'm suppose to do after running your lisp.

[ASMI]

Excuse me Unload and reload all loaded XRefs (refresh):

(defun c:unreload(/ cObj cName)
  (setq cObj(tblnext "BLOCK" T))
  (while cObj
    (setq cName(cdr(assoc 2 cObj)))
    (if
      (and
	 (=(logand(cdr(assoc 70 cObj))32)32)
	 (=(logand(cdr(assoc 70 cObj))4)4)
	 ); end and
      (progn
       (vl-cmdf "_.xref" "_unload" cName)
       (vl-cmdf "_.xref" "_reload" cName)
       ); end progn
      ); wnd if
  (setq cObj(tblnext "BLOCK"))
  ); end while
   (princ)
  ); end of c:unreload

[JeepMaster]

Hey Thanks so much ASMI, it works perfectly. What would I do without helpful experts like you to answer questions. I really appreciate your help on this.

[JeepMaster]

Hey ASMI, I'm just wondering is it possible to only reload the loaded xrefs that was changed? AutoCAD obviously knows which one needs to be updated. I don't understand the lisp, so I wasn't sure how it works. It would be super awsome if the lisp only updates the xref that was changed. You see, if I have 10 xrefs loaded and only 1 xref needs to be updated, there's no point of reloading all 10 xrefs.
Thanks again ASMI for helping out, seems like you always end up answering my lisp questions.

[ASMI]

I think is possible. May be i make it, maybe at next week... May be...

[mdbdesign]

Thanks ASMI it work OK for me.
(no changes required)

[JeepMaster]

I heard they fixed this in AutoCAD 07, is this correct? Either way, we use ADT 04 at work, so doesn't help me anyways.

ASMI is doing awsome work here, so please thank ASMI for that. I'm refering friends to see this thread for his code.

[JeepMaster]

bump bump x2