a profile for system var's?

does anyone have a lisp that gathers all the current system var
settings, and saves them to a text file. and one that can restore them
from a text file..?

(you would think that this info would be included in the user profile,
but since it is not.. i need a way of doing it).

Thanks.

 

This will get you started...snippet of code taken from a routine posted by Peter
Jamtgaard

Gary

(defun C:VarList (/ lstNew STR)
(setq lstVar (setvarlist))
(foreach N lstVar
(setq STR (valtostr (getvar N)))
(while (< (strlen N) 18) (setq N (strcat N " ")))
(setq lstNew (cons (strcat N " " STR) lstNew))
)
)

(defun VALTOSTR (VAL / STR)
(cond ((= (type VAL) 'REAL)
(setq STR (rtos VAL 2 15))
(while (and (wcmatch (substr STR (strlen STR)) "0")
(> (strlen STR) 3)
)
(setq STR (substr STR 1 (1- (strlen STR))))
)
)
((= (type VAL) 'INT)
(setq STR (itoa VAL))
)
((= (type VAL) 'STR)
(setq STR VAL)
)
((= (type VAL) 'LIST)
(setq STR "")
(foreach M VAL
(setq STR (strcat STR " " (valtostr M)))
)
)
)
STR
)

(defun SETVARLIST ()
(setq var_list '("ACADLSPASDOC" "ACADPREFIX" "ACISOUTVER" "ACADVER"
"AFLAGS" "ANGBASE" "ANGDIR"
"APBOX" "APERTURE" "AREA"
"ATTDIA" "ATTMODE" "ATTREQ"
"AUDITCTL" "AUNITS" "AUPREC"
"AUTOSNAP" "BACKZ" "BINDTYPE"
"BLIPMODE" "CDATE" "CECOLOR"
"CELTSCALE" "CELTYPE" "CELWEIGHT"
"CHAMFERA" "CHAMFERB" "CHAMFERC"
"CHAMFERD" "CHAMMODE" "CIRCLERAD"
"CLAYER" "CMDACTIVE" "CMDDIA"
"CMDECHO" "CMDNAMES" "CMLJUST"
"CMLSCALE" "CMLSTYLE" "COMPASS"
"COORDS" "CPLOTSTYLE" "CPROFILE"
"CTAB" "CURSORSIZE" "CVPORT"
"DATE" "DBMOD" "DCTCUST"
"DCTMAIN" "DEFLPLSTYLE" "DEFPLSTYLE"
"DELOBJ" "DEMANDLOAD" "DIASTAT"
"DIMADEC" "DIMALT" "DIMALTD"
"DIMALTF" "DIMALTRND" "DIMALTTD"
"DIMALTTZ" "DIMALTU" "DIMALTZ"
"DIMAPOST" "DIMASO" "DIMASZ"
"DIMATFIT" "DIMAUNIT" "DIMAZIN"
"DIMBLK" "DIMBLK1" "DIMBLK2"
"DIMCEN" "DIMCLRD" "DIMCLRE"
"DIMCLRT" "DIMDEC" "DIMDLE"
"DIMDLI" "DIMDSEP" "DIMEXE"
"DIMEXO" "DIMFIT" "DIMFRAC"
"DIMGAP" "DIMJUST" "DIMLDRBLK"
"DIMLFAC" "DIMLIM" "DIMLUNIT"
"DIMLWD" "DIMLWE" "DIMPOST"
"DIMRND" "DIMSAH" "DIMSCALE"
"DIMSD1" "DIMSD2" "DIMSE1"
"DIMSE2" "DIMSHO" "DIMSOXD"
"DIMSTYLE" "DIMTAD" "DIMTDEC"
"DIMTFAC" "DIMTIH" "DIMTIX"
"DIMTM" "DIMTMOVE" "DIMTOFL"
"DIMTOH" "DIMTOL" "DIMTOLJ"
"DIMTP" "DIMTSZ" "DIMTVP"
"DIMTXSTY" "DIMTXT" "DIMTZIN"
"DIMUNIT" "DIMUPT" "DIMZIN"
"DISPSILH" "DISTANCE" "DONUTID"
"DONUTOD" "DRAGMODE" "DRAGP1"
"DRAGP2" "DWGCHECK" "DWGCODEPAGE"
"DWGNAME" "DWGPREFIX" "DWGTITLED"
"EDGEMODE" "ELEVATION" "EXPERT"
"EXPLMODE" "EXTMAX" "EXTMIN"
"EXTNAMES" "FACETRATIO" "FACETRES"
"FILEDIA" "FILLETRAD" "FILLMODE"
"FONTALT" "FONTMAP" "FRONTZ"
"FULLOPEN" "GRIDMODE" "GRIDUNIT"
"GRIPBLOCK" "GRIPCOLOR" "GRIPHOT"
"GRIPS" "GRIPSIZE" "HANDLES"
"HIDEPRECISION" "HIGHLIGHT" "HPANG"
"HPBOUND" "HPDOUBLE" "HPNAME"
"HPSCALE" "HPSPACE" "HYPERLINKBASE"
"IMAGEHLT" "INDEXCTL" "INETLOCATION"
"INSBASE" "INSNAME" "INSUNITS"
"INSUNITSDEFSOURCE" "INSUNITSDEFTARGET"
"ISAVEBAK" "ISAVEPERCENT" "ISOLINES"
"LASTANGLE" "LASTPOINT" "LASTPROMPT"
"LENSLENGTH" "LIMCHECK" "LIMMAX"
"LIMMIN" "LISPINIT" "LOCALE"
"LOGFILEMODE" "LOGFILENAME" "LOGFILEPATH"
"LOGINNAME" "LTSCALE" "LUNITS"
"LUPREC" "LWDEFAULT" "LWDISPLAY"
"LWUNITS" "MAXACTVP" "MAXSORT"
"MBUTTONPAN" "MEASUREINIT" "MEASUREMENT"
"MENUCTL" "MENUECHO" "MENUNAME"
"MIRRTEXT" "MODEMACRO" "MTEXTED"
"NOMUTT" "OFFSETDIST" "OFFSETGAPTYPE"
"OLEHIDE" "OLEQUALITY" "OLESTARTUP"
"ORTHOMODE" "OSMODE" "OSNAPCOORD"
"PAPERUPDATE" "PDMODE" "PDSIZE"
"PELLIPSE" "PERIMETER" "PFACEVMAX"
"PICKADD" "PICKAUTO" "PICKBOX"
"PICKDRAG" "PICKFIRST" "PICKSTYLE"
"PLATFORM" "PLINEGEN" "PLINETYPE"
"PLINEWID" "PLOTROTMODE" "PLQUIET"
"POLARADDANG" "POLARANG" "POLARDIST"
"POLARMODE" "POLYSIDES" "POPUPS"
"PROJECTNAME" "PROJMODE" "PROXYGRAPHICS"
"PROXYNOTICE" "PROXYSHOW" "PSLTSCALE"
"PSPROLOG" "PSQUALITY" "PSTYLEMODE"
"PSTYLEPOLICY" "PSVPSCALE" "PUCSBASE"
"QTEXTMODE" "RASTERPREVIEW" "REFEDITNAME"
"REGENMODE" "RTDISPLAY" "SAVEFILE"
"SAVEFILEPATH" "SAVENAME" "SAVETIME"
"SCREENBOXES" "SCREENMODE" "SCREENSIZE"
"SDI" "SHADEDGE" "SHADEDIF"
"SHORTCUTMENU" "SHPNAME" "SKETCHINC"
"SKPOLY" "SNAPANG" "SNAPBASE"
"SNAPISOPAIR" "SNAPMODE" "SNAPSTYL"
"SNAPTYPE" "SNAPUNIT" "SOLIDCHECK"
"SORTENTS" "SPLFRAME" "SPLINESEGS"
"SPLINETYPE" "SURFTAB1" "SURFTAB2"
"SURFTYPE" "SURFU" "SURFV"
"SYSCODEPAGE" "TABMODE" "TARGET"
"TDCREATE" "TDINDWG" "TDUCREATE"
"TDUPDATE" "TDUSRTIMER" "TDUUPDATE"
"TEMPPREFIX" "TEXTEVAL" "TEXTFILL"
"TEXTQLTY" "TEXTSIZE" "TEXTSTYLE"
"THICKNESS" "TILEMODE" "TOOLTIPS"
"TRACEWID" "TRACKPATH" "TREEDEPTH"
"TREEMAX" "TRIMMODE" "TSPACEFAC"
"TSPACETYPE" "TSTACKALIGN" "TSTACKSIZE"
"UCSAXISANG" "UCSBASE" "UCSFOLLOW"
"UCSICON" "UCSNAME" "UCSORG"
"UCSORTHO" "UCSVIEW" "UCSVP"
"UCSXDIR" "UCSYDIR" "UNDOCTL"
"UNDOMARKS" "UNITMODE" "VIEWCTR"
"VIEWDIR" "VIEWMODE" "VIEWSIZE"
"VIEWTWIST" "VISRETAIN" "VSMAX"
"VSMIN" "WHIPARC" "WMFBKGND"
"WORLDUCS" "WORLDVIEW" "WRITESTAT"
"XCLIPFRAME" "XEDIT" "XFADECTL"
"XLOADCTL" "XLOADPATH" "XREFCTL"
"ZOOMFACTOR"
)
)
)

 

I think Juerg has one on his web site.

Gary

Juerg Menzi
MENZI ENGINEERING GmbH, Switzerland
http://www.menziengineering.ch

 

Also check out the following, may be what you are looking for.

SYSVARDLG.LSP by Stig Madsen
2002.02.31, Stig Madsen v.0.92

SYSVARS.LSP v0.92 January 2002 by Stig Madsen

Gary

 

thank you for all 3.

 

I just went there and it is truly a gold mine of free stuff. But I couldn't
find anything for system variables (it doesn't help there's a mismatch in my
browser from the left column to the description at right). However, I
copied the entire page to my text editor and did searches from there --
system, variables, vars, etc. Nothing that helped.

Any tips, anyone? Juerg?

Len Miller

 

Hi Len

That's correct, I've no code about this stuff...
The appearance of my site seems to be ok in my browser, but there can be a
problem in other browsers or other settings of view options... will check
this out.

Expresstools -> _SYSVDLG

Cheers