(setq pt (list 0 0));起点(setq pt2 (list 0 100));终点(setq pt3 (list 10 50));文字位置(command "dimlinear" pt pt2 pt3 "")
在auto lisp程序中调用autocad尺寸标注命令。