軟件查抄鋁型材擠壓模具?？壮叽鐦俗⑶樾?

劉文春

（肇慶亞洲鋁廠有限公司，廣東肇慶 526238）

摘要：

關(guān)頭詞：擠壓模; 標注; 主動 復核

在擠壓模設計中，?？壮叽缰苯佑绊懩＞吲R盆 出的型材外形 、尺寸及公役 。為確保?？壮叽缡芸匚宜景匆韵?流程功課 ：

1.由畫圖 室繪制型材截面圖并標注尺寸（客戶確認后出“工序圖”交模具設計室）。

2.設計室縮水組人員將“工序圖”中型材截面圖與標注尺寸按同一 比例縮放（比例數(shù)值依被擠壓合金，型材斷面外形 、尺寸及公役 肯定 ，默許 值1.01[1]），并對標注尺寸綜合斟酌 斷面幾何外形 特點及在擠壓拉伸矯直進程 中的可能轉(zhuǎn)變 進一步進行批改 后出“?？讟俗D”[2]。

3.設計室畫圖 組人員再按“?？讟俗D”繪制模具圖中的?？捉孛鎴D。

4.線割編程組對模孔截面圖對比 “?？讟俗D”進行復查，對?？捉孛鎴D與“?？讟俗D”紛歧 致的反饋設計室畫圖 組更正，查對 無誤后傳線割編程員。

在具體實行 中發(fā)如今 復查中因人工對當前電腦圖的標注尺寸與紙制圖的標注尺寸比對存在誤查與漏查（固然 幾率 不高，但對臨盆 影響極壞），所以提出人工標注，電腦比對消隱，再用當前標注尺寸反推受控圖素，將受控圖素高亮，從而確認是不是 所有圖素被檢的方案。具體方案以下 ：

1、 調(diào)入圖形及標注，并按劃定 放置

a.模具圖中的模孔截面圖（在模具圖主視圖中）、標注圖調(diào)入， 將模孔截面圖在標注區(qū)復制一個副本用作標注搜檢 （?？捉孛鎴D原圖素須保存）。

b.將標注圖移到標注區(qū)（層別不變，照舊 為標注層），并與標注區(qū)模孔截面圖中間 對齊， 若標注圖非1:1比例須還原到1:1比例， 將標注圖中截面圖埋沒到205層（其為工序圖按1.01倍縮放而成，與模孔截面外形 類似 但其實不 吻合，僅作尺寸標示用）。對標注圖中局部標注移回到其原始位置， 并設當前工作層為0層。

c.因模具設計所作預變形的須還原。例如：有啟齒 的須將啟齒 還原，對多孔模有中間 移位的須將中間 移位還原。

2、 人工標注，電腦比對消隱：標注層確保無毛病 尺寸標注

a.確保電腦比對消隱宏被調(diào)入，對標注區(qū)?？捉孛鎴D進行尺寸標注，每標注一尺寸便按快捷鍵挪用 電腦比對模塊進行比對。法式 流程及GPL法式 以下 ：

#procedure PICK_SELECT !vindicator NanZhi.pang 2021

*[1] 判定 $lastent是不是 為標注, 否 退出 172 174 175 176 187 LocGetEntPar 175.out!(172//173)

if(LocGetEntPar($lastent,EP_ENT_TYPE).out!(170//172//173//174//175//176//178//180//187))

then

ek_w_m('最后確立的[$lastent]不是標注 請先確立標注 再履行 本進程 ！')

m(LocGetEntPar($lastent,EP_ENT_TYPE))

exit

endif

N1dimLay:=198 eos N2dimLay:=199 eos BITCKLine::=0

N1dimCol:=15 ! lightGreyColor15[N1dimCol]

N2dimCol:=3 ! darkGreyColor3[N2dimCol]

ie:=0 eos HALT

while(1) do

*[]判定 $lastent是不是 為零 以便讓直線可以被選中 T.LINE/T.ARC/T.CIRCLE

if(cast(user::GetEntTxt($lastent,ep_d_dimens),3).le.0.02) then

PICK pick T.SET T.LINE

ek_highl($lastent,1) !高亮$lastent

ENTS.ID $LASTENT EOS halt

BITCKLine::=.NOT.USER::BITCKLine

else

PICK pick T.SET T.DIM

endif

ek_m('Select a Dimension') ig! "Select a symbolic mate" EkDimensionP ek_m(tmm_msg(638,'')) ig

if(gcod.ne.0)break

* gpntxy

if($p_id.eq.0) then

continue

elseif($p_id.eq.$lastent) then

ek_w_m('選擇圖素不答應 為最新確立圖素!')

continue

elseif($p_id.eq.$lastent) then

ek_w_m('選擇圖素為直線!')

EKPAR EP_D_RATIO 1.0 eos G.DIM ! 繼續(xù)標注

continue

else

m('$p_id break', $p_id, $lastent) ! ufintCDim(1447,2009)

tmpstr:=CKDIM_G($p_id,$lastent) ! CKDIM/ufintCDim 搜檢 標注數(shù)值是不是 相等

if(tmpstr(1:3).eq.'OKT') then

ek_mod_dim ent.id $lastent ent.id $p_id eos redra !實現(xiàn)將兩個標重視 合

! 搜檢 經(jīng)由過程 點竄 原標注與新標注的色彩 圖層

EKP_S_EV($p_id,EP_lev,N1dimLay,ie,ERR_e0) !

EKP_S_EV($lastent,EP_lev,N2dimLay,ie,ERR_e0) !

REDRA

EKPAR EP_D_RATIO 1.0 eos G.DIM ! 繼續(xù)標注

else

! 高亮$p_id,$lastent

!ek_m("11") ek_w_m(m(11,12))

!ek_w_m("11")

ek_highl($lastent//$p_id,1)

ek_w_m(m('搜檢 未經(jīng)由過程 ',tmpstr))

ek_highl($lastent//$p_id,0)

m(tmpstr(1:3), "xxxx", tmpstr)

endif

break

endif

enddo

if(abs(gcod).eq.1) then

m('$stop(1)') ! err stop

$stop(1)

else

m('else') ! break while

endif

#end

b.將對稱構(gòu)造 （一般有中間 線標示， 且尺寸只標一側(cè)。）， 將對稱構(gòu)造 復制一個副本，經(jīng)由過程 沿中間 線鏡像使圖素堆疊 進行搜檢 ， 并在圖紙上畫中間 線或?qū)σ延兄虚g 線打鉤確認。

c.對不異構(gòu)造 （尺寸只標一處，一般標稀有 目 ）， 將其復制一個副本，將多個不異構(gòu)造 的副本經(jīng)由過程 平移或扭轉(zhuǎn) 進行堆疊 搜檢 ， 并在圖紙上劃偏向 箭頭確認。

3、 由當前標注反推已標聯(lián)系關(guān)系 圖素，確保無漏標尺寸。

a.在3D畫圖 軟件Think3中，標注分為兩線平行標注（種別 碼27）；兩線角度標注（種別 碼27）；半徑標注（種別 碼10）； 直徑標注（種別 碼11）； 相切圓弧標注（種別 碼15）；線點切點標注（種別 碼16）；兩點標注（種別 碼04）； 程度 /垂直兩點標注（種別 碼05/06）

b.將標注區(qū)標注經(jīng)由過程 屏顯按鈕（因當前標注在0層及199層；0層為未注壁厚等在“模孔標注圖”無對應具體標注數(shù)值的標注，故不克不及 消隱到199層；199層為在“?？讟俗D”有對應具體標注數(shù)值并經(jīng)由過程 復核的標注）選中，按挑選 按鈕將各標注種別 及其所聯(lián)系關(guān)系 的圖素進行統(tǒng)計，并將成效留存 到響應 類其它薈萃中。對本次統(tǒng)計未用到的種別 ，響應 的搜檢 框變灰色，用到的種別 可經(jīng)由過程 響應 的搜檢 選中使其尺寸及聯(lián)系關(guān)系 圖素高亮顯示。

c.當兩線平行標注時，距離為零時，我們稱其為共線標注 ，為便于闡明統(tǒng)計，將其從平行標注中離散歸入半徑標注類。

d.在高亮顯示被標圖素時，尺寸標注自己 會干擾判定 時，可經(jīng)由過程 “層0”、“層199”搜檢 框?qū)俗⒎忾] 顯示，而只高亮顯示被標注的圖素（即直線和圓

e.弧等）

f.當設計室調(diào)換 圖形時為避免重新 搜檢 ，將舊圖變成 虛線放到層196，如許 只對差別 部份 搜檢 便可 。

講演了操縱Think3的GPL說話 ，經(jīng)由過程 較量爭論 機輔助復核使擠壓模?？壮叽鐦俗⑼耆芸?，杜絕尺寸的誤標與漏標。經(jīng)由 以上步調(diào) ，完全杜絕了標注毛病 ；對尺寸漏掉 也進行了有用 節(jié)制 。特別 對新員工功課 體例是不是 存在忽略 ，做到了有據(jù)可查，以便進行實時 改正 。避免了手工劃勾查對 的不肯定 性。