I've got idea from (setq ARCTACADVAR (mapcar (function (lambda (key) (cons key (getvar key)))) '("aperture" "blipmode" "cmdecho" "cecolor" "highlight" "clayer" "orthomode" "osmode" "pickbox" "snapang" "snapang" "plinewid" "expert" "ctab" "cvport" "attmode" "attreq" "attdia" "filedia" "texteval" "snapmode" "textstyle" "dimtxt" "angbase" "cmddia" "hpname" "hpang" "hpscale" ))) Now I want to collect alls setvar from "ACADLSPASDOC" "ACADPREFIX" to "XREFCTL" "ZOOMFACTOR",this code like this _$ (setq setvaractive (getvar ?????)) >>>the value of setvar don't put in (threw a way) ("ACADLSPASDOC" "ACADPREFIX"......"XREFCTL" "ZOOMFACTOR"))