[求助] 請教一個標註LISP問題

[复制链接]

ykuan

少将

Rank: 8 Rank: 8

4 主题	127 帖子	1万积分

电梯直达

楼主

发表于 2015-12-8 06:44:16 | 只看该作者回帖奖励

|倒序浏览 |阅读模式

本帖最后由 ykuan 于 2015-12-8 06:50 编辑

這是我的程式,我要標一個尺寸是有固定公差的,執行沒問題,但是我如果只要標尺寸不要公差dimlinear還是會帶出公差
(defun C:qq02(/ tpenter tmenter temptp)    (setq tpenter "0.05")
  (setq tmenter "-0.02")
  (setq temptp "2")
  (command "dimtol" "on")
  (command "dimlinear" "dimtdec" temptp "dimtp" tpenter "dimtm" tmenter)
  (princ)
)
我的想法是家這一行(command "dimtol" "OFF")但是便沒公差了
(defun C:qq02(/ tpenter tmenter temptp)
  (setq tpenter "0.05")
  (setq tmenter "-0.02")
  (setq temptp "2")
  (command "dimtol" "on")
  (command "dimlinear" "dimtdec" temptp "dimtp" tpenter "dimtm" tmenter)
  (command "dimtol" "OFF")
  (princ)
)
請問如何改善,謝謝!

一個, lisp

有奖推广贴子：