本帖最后由 wowan1314 于 2014-12-18 14:01 编辑

下载了T20，CAD版本是CAD2004，发现左下角点没有比例了。 这点很不方便。

看了看发现大家都有此问题，没办法，只能自己想个替代的方案了！

;;把下面这段代码加到天正SYS文件夹下acaddoc文件的最后面。
;;这样左下角就会出现当前图纸比例了， 修改比例 就输入TB命令修改。
(setvar "MODEMACRO" (strcat "比例 1:" (rtos (getvar "hpscale") 2 0)))
(defun c:tb ( / bl)
(setq bl (rtos (getvar "hpscale") 2 0))
(setq bl (getint (strcat "\n当前比例<" bl ">:")))
(command "tpscale" bl)
(setvar "MODEMACRO" (strcat "比例 1:" (rtos (getvar "hpscale") 2 0)))
(princ)
)