1、新建一个文本文档，将下列字符复制其中保存，并将其后缀名改为LSP放到AUTOCAD子目录下；
字符：
;标注的快捷键
(DEFUN C:DD()(COMMAND "dimlinear"))
;垂直标注公差
(defun c:czc()
(setq p1 (getpoint "\n 请输入标注起点:"))
(setq p2 (getpoint "\n 请输入标注终点:"))
(setq d21 (cadr p1))
(setq d22 (cadr p2))
(setq d1 (getstring "\n 请输入标注尺寸:"))
(setq d2 (abs (- d21 d22)))
(setq s (getstring "\n输入上公差：") x (strcat "^" (getstring "\n输入下公差：")))
(if (= s "0") (setq s " 0"))
(if (= x "^0") (setq x "^ 0"))
(if (/= d1 "")
(setq dd (strcat "%%c" d1 "{" "\\" "H0.7X" ";" "\\" "S" s x ";" "}" )) (setq dd (strcat "%%c" "<" ">" "{" "\\" "H0.7X" ";" "\\" "S" s x ";" "}" )))
(command "dimlinear" "ve" p1 p2 "T" dd)
)
2、按图加载lisp文件
3、重启AUTOCAD；
4、标注步骤：
1、在输入栏输入快捷键CZC；
5、标注步骤：
2、点击要标注的上端点；
6、标注步骤：
3、点击要标注的下端点；
7、标注步骤：
4、输入要标注的尺寸；（若为默认尺寸，该步骤则右键点击）
8、标注步骤：
5、输入上公差数值，按回车键结束；（无图）
6、输入下公差数值，按回车键结束；（无图）
7、点击放置标注的位置；
