91
AutoLISP (Vanilla / Visual) / Re: Modify DWGUNITS
« Last post by FELIX on May 17, 2024, 11:44:21 PM »With my ancient A2K, this works: (setvar "LUNITS" 2) <- for decimal
Untested but?Code: [Select](defun check-and-set-lunits ()
(if (/= (getvar "LUNITS") 6) ; Check if LUNITS is not already set to 6
(progn
(setq change_units (strcat "\nLUNITS is currently set to " (itoa (getvar "LUNITS")) ", do you want to change it to 6? [Y/N]: "))
(if (equal (getstring change_units) "Y")
(setvar "LUNITS" 6) ; Change LUNITS to 6
(prompt "\nLUNITS remains unchanged.")))))
(check-and-set-lunits)
Change for meters
The command is -DWGUNITS and LUNITS does not accept =6