Topic: Insert xref's in model space & paper space

[mohan]

I have to insert specific xref's in model space & specific in paper space
when I open a dwg if it was in model space what are the xref's belong to model space it should insert it, what are those belong to paper space it should go to paper space & insert it.

I have tried still not finish.

Code - Auto/Visual Lisp: [Select]

1. (defun c:1906-Xref ( / )
2. (setvar "CLAYER" "0")
3.  
4. (if (/= (getvar "TILEMODE") 0)
5.     (setvar "TILEMODE" 0)
6. (if (= (getvar "TILEMODE") 0)
7. (Progn
8. (command "_-xref" "detach" "Xref_TITLE FRAME SECTION 1" )
9. (command "_-xref" "overlay" "W:\\04-Tender drawings\\01-Roads Locations\\XREF\\Xref_TITLE FRAME SECTION 1.dwg" "0,0,0" "" "" "")
10. (command "zoom" "e")))
11. )  
12. (princ))

[masao]

Code: [Select]

(defun c:1906-Xref ( / )
(setvar "CLAYER" "0")
 
(if (/= (getvar "TILEMODE") 0)
    (setvar "TILEMODE" 0)
)
(command "_-xref" "detach" "Xref_TITLE FRAME SECTION 1" )
(command "_-xref" "overlay" "W:\\04-Tender drawings\\01-Roads Locations\\XREF\\Xref_TITLE FRAME SECTION 1.dwg" "0,0,0" "" "" "")
(command "zoom" "e")
(princ))
try it!