autocad中尺寸公差自動標注

《autocad中尺寸公差自動標注》由會員上傳分享，免費在線閱讀，更多相關內(nèi)容在行業(yè)資料-天天文庫。

1、AutoCAD中尺寸公差的自動標注AutoCAD中尺寸公差的自動標注發(fā)布日期：2010-4-6[收藏評論沒有找到想要的知識]AutoCAD中尺寸公差標注很麻煩，本文給出一短小AutoLISP程序，實現(xiàn)了公差值的自動標準，通過鼠標兩次選擇即可完成其操作，使用起來非常方便、快捷?！　utoCAD在用于機械設計時，公差標注有兩種方法；其一是通過DIM參數(shù)設定完成，但參數(shù)設定繁瑣，速度也慢，每一個不同公差值都要設定一次，在R120中名義尺寸與公差值的小數(shù)點位數(shù)相同使名義尺寸顯得累贅(R130對此作了改進)；其二是用

2、TEXT指令直接寫入，但速度也慢，字的位置也不易寫準，常需用MOVE指令移動一次。上述兩種方法都需在作圖時備公差數(shù)值表，先查表后標注，因此在尺寸公差標注上所花時間很多?！　」P者用AutoLisp編寫了一尺寸公差自動標注程序，使用效果良好，速度也快，調(diào)用時僅兩次操作即可完成：首次操作選擇公差等級；再次操作選擇被標注尺寸即可完成尺寸公差的自動標注。程序由四部分組成：輸入公差等級自動查表；選取被標注尺寸并進行相應處理；尺寸大小分類并查取上下偏差值；公差值寫入。若將該指令加入菜單后操作起來將更方便，即將公差等級符號(

3、如H7、b6、r6、JS7等)做成幻燈片在菜單上調(diào)用。一、輸入公差等級和查表　　在菜單上選擇了公差標準條目后、屏幕上出現(xiàn)相應幻燈片(如圖示)當選取相應公差等級的項目后，完成了兩個指令輸入：首先給出了公差等級(實際上是給出了在公差值表中該等級的相應行號n值)；其次是啟動了公差標準Lisp程序。Lisp程序啟動后，打開公差值表(Tole.TXT)使用repeat函數(shù)在公差值表中連續(xù)讀取一行數(shù)據(jù)，至直與所標公差等級相應的第n行為止?！　∪羲鶚斯顬镠8，則菜單上相應行內(nèi)容為:　　[DAN(LH8)]^C^P(set

4、gn3)tolerance　　若所標公差為JS6，則菜單上相應行內(nèi)容為：　　[DAN(JS6)]^C^P(setgn10)tolerance　　公差標注幻燈片　　(注DAN為幻燈片庫名DAN.SLB,LH8、JS6為幻燈片名LH8.SLD和JS6.SLP,tolerance為公差標準Lisp程序指令名)　　若不做幻燈片則在啟動Lisp前先鍵入Lisp變量n的值。為使標注更方便，操作當前層自動換至尺寸標注層(DIM層)。二、選取被標注尺寸并進行處理　　根據(jù)Lisp提示在圖形中選取被標注尺寸，通過相應處理，得到了

5、該尺寸的數(shù)值、字體高度、位置、角度等留作備用，使用的函數(shù)是entget和assoc。在獲取被標注尺寸時，使用了Substr函數(shù)將圓標注尺寸前面的R、r、Φ隱去便于后續(xù)數(shù)值大小判別。同時還判別了該尺寸是否帶有小數(shù)點，可使公差值寫入時位置更準確，因為小數(shù)點所占不到一個字寬。三、尺寸大小分類并獲取相應上下限偏差值　　在第一步查表所得的數(shù)據(jù)行含有該公差等級中的全部上下限數(shù)值(GB1801-79表中的一列結(jié)合第二步獲取的被標注尺寸數(shù)值，本步即可查出被標注尺寸的上下限偏差值，選用Cond函數(shù)判別偏差值所處位置，再用Sub

6、str函數(shù)將其讀出，如若被標注尺寸為40，則上偏差值為第75字符起的6個字符，下偏差值為第82字符起的6個字符，要求Tole.TXT數(shù)據(jù)表應豎列整齊。四、公差值寫入　　用TEXT指令將公差值寫入，其寫入位置依據(jù)名義尺寸的位數(shù)及是否有小數(shù)點算出，角度字高也隨名義尺寸變化。對JS級公差作特殊處理(n=10、11、12*)?！　榱耸筁isp具有通用性，對絕對值公差(如+0.010、+0.020、0+0.01、*0.01等)也作了考慮，因為這些公差常用的不多，直接寫入了Lisp程序。程序中n從40起，數(shù)據(jù)表中并沒有

7、第40行以及后續(xù)行。　　該Lisp程序不大，但函蓋了全部機械設計中的公差標注類型如相對公差(國標)、絕對公差、一般尺寸、半徑尺寸。為了使標注美觀還考慮了小數(shù)點，使用了While函數(shù)可對同公差等級的尺寸連續(xù)標注。五、幾點說明　　1由于需獲取尺寸標注的名義尺寸，故在尺寸標注前DIMASO應設定為DFF，否則取不到尺寸數(shù)值。　　2程序是以字符位置取上、下限偏差，故公差數(shù)值表(tole.TXT)中應整齊，只能用純文本編輯軟件編寫(如EDIT)。　　3幻燈片編排可根據(jù)使用頻度來安排，本人是用AutoCAD進行模具設計，

8、故幻燈片第一頁20個做了上述排序，讀者可根據(jù)實際情況作調(diào)整。4本程序在AutoCADR11.0R12.0、R13.0上通過，源程序和公差值表如下：(defunc:tolerance()(setqtxt(open"tole.txt""r"))(repeatn(setqtols$(read-linetxt)))(closetxt)(setvar"cmdecho"0)(command"layer""s""