仿Mastercam──粗挖方槽(平行環(huán)切)

羅蓋仙

, A. V# \2 b0 a5 \2 Y. R7 f, A; D小弟兩多年前寫(xiě)的，那時(shí)剛開(kāi)始被老師教會(huì)使用CAM軟體與變數(shù)程序，結(jié)果發(fā)現(xiàn)我對(duì)CAM軟體沒(méi)有太大的興趣，
找不到目標(biāo)寫(xiě)，邊玩CAM軟體發(fā)現(xiàn)CAM的平行環(huán)切很有規(guī)律我去研究了，於是著筆寫(xiě)寫(xiě)看
8 I. `8 I% Z6 K' g& N
5 l' R/ j) N$ y8 ?  ]矩形槽(長(zhǎng)方形)還不適用，我這個(gè)程序只針對(duì)正方形槽，這樣比較單純讓網(wǎng)友易懂，長(zhǎng)方形原理也一樣我有私自寫(xiě)好
1 S! K4 U7 ?. g3 ^3 E+ L: U
先說(shuō)明一下CAM挖槽(平行環(huán)切)的計(jì)算規(guī)則：
* s% ^, x. ^. V2 L取內(nèi)槽的一半為#4，假設(shè)槽單邊長(zhǎng)為60mm，半內(nèi)槽Ｉ為30.
3 E* p% u3 Y# {# G5 M; OU(#21)為切距.步距
#100=#4-#18 (內(nèi)槽－刀半徑)
#101=#21/2. (切距的一半，準(zhǔn)備用余數(shù)與#101做對(duì)比的分界)
" t7 T& H5 O' r+ O#102=[#100/#21-FIX[#100/#21]]*#21 (取余數(shù))
4 G1 z  l3 I/ E: @9 J' v* K#103=#102-#101(如果余數(shù)大于切距的一半，將會(huì)使用到他)

+ }7 M) B5 W/ e9 f2 l以下兵分四路：
甲.IF余數(shù)EQ0. (剛好整除)：先做#101，再做#21，然後用#21加到底
乙.IF余數(shù)EQ#101 (切距的一半)：先做#101，然後用#21加到底
% J: W" a8 ^. e9 j4 b丙.IF余數(shù)GT#101. ：先做#103，再做#102，然後用#21加到底
: R& K. F  w/ x丁.IF余數(shù)LT#101. ：先做#102，再用#21加到底
圖解兵分四路，以及左下図為CAM的路徑，右下図為我的路徑，其實(shí)都一樣
  n7 t. Q( o+ n) l

登錄/注冊(cè)后可看大圖

登錄/注冊(cè)后可看大圖

7 N. y6 I& z' P$ u
4 b% Y: _7 C! g' T( o; A%
- K2 a- R* S& ]& H+ z1 hO0003(主程序)
' p; W: l" G- q2 g* W+ Q  HG91G28Z0.
* L' p2 a2 ~$ `# M8 _T1M6
* _1 k1 b  q) O$ B5 X1 |3 wG0G54G90G94G17X0.Y0.
* d  C% r* F8 {7 Y0 k% B. V& YG43H1Z100.S1000M3
! {- B+ s  ~0 A' ?Z10.
G65P5X0.Y0.I30.R5.U2.Z-2.F800
2 m/ h4 s6 T* m9 ZG0Z200.
9 U' t1 g3 y4 D' N  L" [. tG91G28Z0.Y0.
8 D1 C1 u; g! @1 N* t% O; YM0
%
9 u- @  w; [  `
XY工件的中心
1 e) }  F3 D9 d1 F! W) G5 W$ pI內(nèi)槽的一半
R刀半徑
" s6 O* C) U- d( W+ tU切距
Z深度
+ R/ T4 n8 L0 z3 s
8 B! l( f) F4 {4 `' G
%
; T& H- b8 a6 M6 KO0005(副程序)
) @7 Y" o' j0 B7 K4 `$ {3 p#100=#4-#18 (內(nèi)槽-刀半徑)
#101=[#21*.5] (切距的一半)
#102=[#100/#21-FIX[#100/#21]]*#21 (取餘數(shù))
#103=#102-#101 (餘數(shù)-切距的1/2)

G90G1X#24Y#25F[#9*5.]
Z[#26+10.]F[#9*3.]
Z#26F[#9/3.]
5 Z- _" f1 ?- O. r
- M- P( A+ j7 s8 w2 e, l(甲)IF[#102EQ0.]GOTO1
(乙)IF[#102EQ#101]GOTO1
4 W) W0 z. N9 j& A* G3 t$ u% b(丙)IF[#102GT#101]GOTO3
(丁)IF[#102LT#101]GOTO4


* k1 A* y, z% x, vN1WHILE[#101LE#100]DO1
& n% C- F9 r' \" R/ l' n4 |G1X[#24+#101]F#9
Y[#25+#101]
6 F3 G7 ~1 U0 t' E" ^& kX[-#101+#24]
* C1 G2 l% X) e4 I; O, z" RY[-#101+#25]
' e& N( h1 F0 o8 KX[#24+#101]
3 }8 L2 D/ b6 O# G2 ?, BY#25
IF[#102EQ0.]GOTO2
#101=#101+#21
END1
G0Z30.
M99

N2#27=#21(切距)
6 u: E; a: ~) J" B) @. DWHILE[#27LE#100]DO2
G1X[#24+#27]F#9
4 o$ r) M9 w0 F2 x1 q% tY[#25+#27]
' H" L" {! q; m: r/ i% jX[-#27+#24]
Y[-#27+#25]
. r& Y3 Q" m2 z; {6 c. ^3 PX[#24+#27]
: J+ J# t; z% g) r7 {$ W( [Y#25
- W3 y6 x( N5 N; ]2 H" t27=#27+#21
END2
( ^2 v9 ^9 {" l4 x) VG0Z30.
: a. ~  v5 l: E5 gM99

N3G1X[#24+#103]F#9
! M& n7 ?4 j1 K5 _, h/ KY[#25+#103]
X[-#103+#24]
. Y$ x* J0 O- ?, L: FY[-#103+#25]
X[#24+#103]
7 f$ E2 A7 o3 cY#25
" U- M2 p$ I  P/ C& i" ~9 c
N4WHILE[#102LE#100]DO3
G1X[#24+#102]F#9
Y[#25+#102]
X[-#102+#24]
Y[-#102+#25]
X[#24+#102]
Y#25
#102=#102+#21
END3
% s0 a  E7 j9 X) X& c+ b$ N/ RG0Z30.
M99
& X$ @# x( F+ P6 v8 k6 I%

0 }0 f+ S( ?/ J( w) B) f以上有實(shí)際在機(jī)臺(tái)上空跑運(yùn)行過(guò)，程序有點(diǎn)長(zhǎng)，自己有改良成最精簡(jiǎn)的，如果有高手以原則不變把我的程序簡(jiǎn)化者，請(qǐng)指點(diǎn)
我想用我的我私下的簡(jiǎn)化版(那一套我改的很有信心)與您對(duì)照，我上傳的這一套還有很大的改良空間

空氣中的小魚(yú)

首先，先支持一下

空氣中的小魚(yú)

我記得應(yīng)該是2004年，我也寫(xiě)過(guò)類(lèi)似的程序，先去翻翻看能不能找出來(lái)。
. `( U! M8 ~: n不過(guò)后面也如樓主，重寫(xiě)了N遍，最后的最新版本給模塊化了，好像是2009年是最新版本，只寫(xiě)了FANUC和TOSUNC的系統(tǒng)，主要用于模架模框區(qū)域加工，可以加二維和三維，加工類(lèi)型比較多，程序能夠共用相同系統(tǒng)不同版本，具備容錯(cuò)性能，人性化操作，程序必須配合機(jī)床參數(shù)方可使用，程序總共大概上W行，由于是商業(yè)話的程序，我就不貼出來(lái)了，
找個(gè)單獨(dú)簡(jiǎn)化的貼出來(lái)看看吧，不過(guò)要先找找，不一定能夠找到。

空氣中的小魚(yú)

回復(fù) 1# 羅蓋仙
你這個(gè)適合銑平面，建議你改善為可以銑模框的，帶R角的
實(shí)現(xiàn)了以上，就增加做框四個(gè)面可以帶不同斜度的功能
; Y. M' N( h& C* n( s( I: }) I實(shí)現(xiàn)了以上，就增加加工四個(gè)面底部加工不同R底的功能（要有R底加密走刀）
實(shí)現(xiàn)了以上，就增加加工四面面頂部加工不同R底的功能（要有R底加密走刀）
到了后面可以增加走刀模式刀路，比如，走邊，走底，插角。。。

若楓

我在聽(tīng)天書(shū)，

羅蓋仙

/ J& V# a+ ]) E) {* y1 n1 P: [
8 o1 G' u( |2 Y謝謝指點(diǎn)
7 o7 K6 i" O/ U5 n1 ^0 c, t+ o我本來(lái)也想加入XY方向的預(yù)留量.精修次數(shù).精修量等等，可能還要再動(dòng)腦
Z軸分層銑深的設(shè)置，想簡(jiǎn)單的在主程序多呼叫幾次就有效果
- H* O. t6 h* c+ l0 P- f如：
G65P5X0.Y0.I30.R5.U2.Z-3.F300
G65P5X0.Y0.I30.R5.U2.Z-6.F300
! y* }- H! f3 G6 _! Y6 Z9 wG65P5X0.Y0.I30.R5.U2.Z-9.F300
G65P5X0.Y0.I30.R5.U3.Z-10.F100(有精修的效果)
以上為基本.簡(jiǎn)單的設(shè)置

/ x& f" S& r- J: g8 O" M如果最後還有內(nèi)槽的外形銑削會(huì)更好，所以我這個(gè)只是理論
# \5 X* j/ f! W+ ^5 V; X6 N實(shí)際使用請(qǐng)當(dāng)將就用，還是可以用，沒(méi)那麼多功能

xinxuan110

高手啊,頂!!!

cadme

佩服樓主，原理看的明白，但自己一直沒(méi)有這個(gè)耐心。

羅蓋仙

回復(fù) 8# cadme

可能是你工作比較忙碌，還要加班沒(méi)多余的時(shí)間
+ U" R4 z) k& j6 J9 ~5 H0 O我比較會(huì)忙裡偷閒，悠閒很快樂(lè)

lixuejin

確實(shí)看不懂 很少用宏