Hello, I HAVE A COPY TO LISP selected objects to a given distance, LISP THIS IS ADDED THE COMMAND PAN him, the distance is saved in a variable (USERS) THE PROBLEM IS THAT CAN NOT BE SO MULTIPLE COPY. (The variable distance is separated from lisp test1 as there are other lisp that depend on this variable is therefore not incorporated eh).
Lisp variable test1
(defun c:DE (/ CAD us1)
(setvar "cmdecho" 0)
(setq us1 (getvar "USERS3"))
(setq CAD (GETSTRING "\nDistance specify: "))
(COMMAND "SETVAR""USERS3"CAD)
(setvar "cmdecho" 1)
(princ))
Lisp test1
(defun c:test1 (/ di cad cadu)
(setvar "cmdecho" 0)
(setq di (getvar "USERS3"))
(setq cad (strcat "@"di"<270"))
(setq cadu (strcat "@"di"<90"))
(setq ss (ssget "_:L"))
(command "copy" ss "" "0,0,0" cad )
(command "-Pan""0,0,0"cadu)
(setvar "cmdecho" 1)
(princ))