【分享】一个标尺寸公差的小程序！！！！

为什么我设置好了，使用命令时DTOL是未知命令呢？？？？？

Comm.load "dtol")
Comm.:dtol

或者  工具----AutoLIST
  
如图：

wayne wrote:
   
  是的, 必須加上括號, lisp是由許多括號組合而成, 由內括號運算到外括號, 所以括號實在太煩太複雜了, 最後記得存檔, 並重新啟動AutoCAD.

  
我用的是cad2000中文简体版，下面是加入(appload "dtol.lsp" )样式，还是不行，不知那里有错。程序dtol.lsp我也按要求复制到support位置了。
(defun c:vlisp ()
   (if (/= nil c:vlide) (c:vlide))
)
  
(princ "已加载。")
(princ)
(appload "dtol.lsp" )

太过简单了，不过还是不错的

程序不成熟!!!

qm007 wrote:
程序不成熟!!!

  
那你来一个更好的

Joseph Lin wrote:
很實用的東西，尤其是加上公差後整格尺寸仍維持一個object，有助於日後的編輯。如果能在提示輸入上下公差前先選擇公差字体縮小倍率那就更完美了，改天我試著改改看。

  
标注样式--修改--公差--高度比例，选好高度比例即可。程序不错。

我不會lisp，
但是我提供一個方法，只要是2000以上用戶都可用！

提供一下希望對於不會lisp的用戶有所幫助！
要擅用內部的功能，除非必要在花時間學lisp！
如圖不清楚在這裡
https://home.pchome.com.tw/soho/s816050/pt/92-08-22-02.gif

使用DTOL.LSP的心得：
1.在Dimension Toolbar中設計一個稱為 Gen. Tolerance的icon，Macros內容如下
           ^C^C(LOAD "DTOL") _DTOL  
2.先以平常方式標註尺寸(基本尺寸)，
3.按Gen. Tolerance icon，進入LISP輸入上下公差及選取基本尺寸，完成公差
  標註，唯此時基本尺寸和公差尺寸字高相同。
4.選取標註的尺寸後按Standard Toolbar中之Properties icon。
5.修改Tolerance部份之Text high值(如0.8)，按右上角之X鈕，便完成公差標註。
6.要重新設定上下公差值時只要再按一次Gen. Tolerance icon即可。
7.此LISP短小精幹，我很喜歡！