仿Mastercam──粗挖方槽(平行环切)

羅蓋仙

1 k( q4 r( _" }: [. _" B. v& z$ A
. l$ M4 }- ^. x. J3 R3 Y小弟兩多年前寫的，那時剛開始被老師教會使用CAM軟體與變數程序，結果發現我對CAM軟體沒有太大的興趣，
# @" f( c: h, W5 I$ _% J找不到目標寫，邊玩CAM軟體發現CAM的平行環切很有規律我去研究了，於是著筆寫寫看
! g; A; ?6 y3 \0 d- j. s
; ?. Y1 a! Y4 }/ {" ]5 N; Q矩形槽(長方形)還不適用，我這個程序只針對正方形槽，這樣比較單純讓網友易懂，長方形原理也一樣我有私自寫好
/ L; @3 f* b$ _
% F; w% s# _/ m9 W9 U0 I: U先說明一下CAM挖槽(平行環切)的計算規則：
取內槽的一半為#4，假設槽單邊長為60mm，半內槽Ｉ為30.
. U" l7 D5 s+ x# j  TU(#21)為切距.步距
% ]3 h! j+ N8 H( f/ _; _#100=#4-#18 (內槽－刀半徑)
' E$ M: g. i! S6 P! \& {" w) P" a#101=#21/2. (切距的一半，準備用余數與#101做對比的分界)
" {  L( }( e' f1 [& l; `+ K#102=[#100/#21-FIX[#100/#21]]*#21 (取余數)
+ V4 t# [. N% l) B: ^5 n' M3 v#103=#102-#101(如果余數大于切距的一半，將會使用到他)
. }/ O. R8 g* N
: w9 Y% J0 E& A( x以下兵分四路：
* ~: U# Q) G* Y8 ]甲.IF余數EQ0. (剛好整除)：先做#101，再做#21，然後用#21加到底
9 b5 C4 y0 {- X' m, I1 i1 B! w9 g乙.IF余數EQ#101 (切距的一半)：先做#101，然後用#21加到底
丙.IF余數GT#101. ：先做#103，再做#102，然後用#21加到底
0 e! n7 J1 ]' D. u7 O& C/ ~1 K& g丁.IF余數LT#101. ：先做#102，再用#21加到底
9 H# a0 f' y4 i2 Q圖解兵分四路，以及左下図為CAM的路徑，右下図為我的路徑，其實都一樣

3 P7 t$ O; v+ H, }2 a& w

% w1 u) k; e! b8 m- w& I: Q1 p: W
1 T0 T- M( g! P& [%
O0003(主程序)
G91G28Z0.
T1M6
3 D3 @0 M6 X, q5 H% y. _G0G54G90G94G17X0.Y0.
- _$ ]3 h% l  T7 VG43H1Z100.S1000M3
Z10.
* T# p6 C# E: D% J+ r0 l6 N# w2 k0 @G65P5X0.Y0.I30.R5.U2.Z-2.F800
G0Z200.
, `8 O) |# q- b0 {2 }5 ]G91G28Z0.Y0.
M0
; `  w$ e* J1 _, m/ F%

XY工件的中心
0 f/ w. T( k& k" {' ]I內槽的一半
R刀半徑
# ?; r$ x) c/ m+ _$ k/ [6 hU切距
! ~$ ~/ i9 w) cZ深度
- s- t, j7 L% p) B
% B$ f$ ~2 u1 d4 e& @5 {
%
O0005(副程序)
0 {$ k' l7 {: k% N: i, \. {7 ^#100=#4-#18 (內槽-刀半徑)
#101=[#21*.5] (切距的一半)
#102=[#100/#21-FIX[#100/#21]]*#21 (取餘數)
#103=#102-#101 (餘數-切距的1/2)

G90G1X#24Y#25F[#9*5.]
Z[#26+10.]F[#9*3.]
Z#26F[#9/3.]
  ^& @9 e* z$ \# C
# i9 T) s% y+ F(甲)IF[#102EQ0.]GOTO1
(乙)IF[#102EQ#101]GOTO1
4 O  i6 R1 H/ _* ?" T8 R, S(丙)IF[#102GT#101]GOTO3
(丁)IF[#102LT#101]GOTO4
9 ]2 F( i" g) T; F7 D

N1WHILE[#101LE#100]DO1
  k: D' z2 K0 RG1X[#24+#101]F#9
3 g; K( P) G1 F. ^% [/ YY[#25+#101]
X[-#101+#24]
Y[-#101+#25]
) W; v$ y: p8 Y) SX[#24+#101]
7 d- x  E9 g+ }# rY#25
IF[#102EQ0.]GOTO2
  t: k  u! k. g" |, u. f#101=#101+#21
* A* H  J7 t( FEND1
: F0 Y3 P3 n; ^# O  W1 x3 XG0Z30.
M99
3 ?( v9 H$ t$ O. K7 Y( Q' w$ j# n
N2#27=#21(切距)
WHILE[#27LE#100]DO2
) Y, G% w. F: v3 ]2 gG1X[#24+#27]F#9
Y[#25+#27]
* x) C2 A3 r. G" c( c* HX[-#27+#24]
8 ]1 s" S9 e7 QY[-#27+#25]
; c! ~1 F3 I/ p' @. K( NX[#24+#27]
Y#25
' N+ w  n' Q5 S* B7 F27=#27+#21
1 [4 s5 J* D7 n6 ~9 p  e* F+ h& O3 HEND2
G0Z30.
M99
, e4 [- d1 [. ?: d- C
N3G1X[#24+#103]F#9
! I2 N( I+ X! N! `1 m' o! S* UY[#25+#103]
X[-#103+#24]
+ @: x# C5 L" bY[-#103+#25]
% p4 }; m# N2 xX[#24+#103]
. X) ~) p( d+ s) h: t" ZY#25

; c% W$ l- H! \7 `N4WHILE[#102LE#100]DO3
G1X[#24+#102]F#9
Y[#25+#102]
% M9 z4 H/ o3 O7 k# a7 z2 m8 XX[-#102+#24]
( W1 f' ~$ e5 J) F' c. u/ KY[-#102+#25]
X[#24+#102]
4 O$ z7 G; {0 y$ R6 IY#25
#102=#102+#21
END3
& e) G) W* c/ J( R( XG0Z30.
- g( O4 B: K; l: W$ PM99
2 w& A+ K) R- w- X%
) x0 M8 p5 j+ _/ V, e
以上有實際在機台上空跑運行過，程序有點長，自己有改良成最精簡的，如果有高手以原則不變把我的程序簡化者，請指點
我想用我的我私下的簡化版(那一套我改的很有信心)與您對照，我上傳的這一套還有很大的改良空間

空气中的小鱼

首先，先支持一下

空气中的小鱼

我记得应该是2004年，我也写过类似的程序，先去翻翻看能不能找出来。
2 y7 I; w- a8 a% h不过后面也如楼主，重写了N遍，最后的最新版本给模块化了，好像是2009年是最新版本，只写了FANUC和TOSUNC的系统，主要用于模架模框区域加工，可以加二维和三维，加工类型比较多，程序能够共用相同系统不同版本，具备容错性能，人性化操作，程序必须配合机床参数方可使用，程序总共大概上W行，由于是商业话的程序，我就不贴出来了，
找个单独简化的贴出来看看吧，不过要先找找，不一定能够找到。

空气中的小鱼

回复 1# 羅蓋仙
' B* T6 f* C7 ?/ R8 l你这个适合铣平面，建议你改善为可以铣模框的，带R角的
实现了以上，就增加做框四个面可以带不同斜度的功能
实现了以上，就增加加工四个面底部加工不同R底的功能（要有R底加密走刀）
2 b& _# E5 K$ W& t1 k0 {实现了以上，就增加加工四面面顶部加工不同R底的功能（要有R底加密走刀）
. b3 y: L/ l! W8 B8 |到了后面可以增加走刀模式刀路，比如，走边，走底，插角。。。

若枫

我在听天书，

羅蓋仙

8 G7 \' e% ^6 q  a# X1 V8 \謝謝指点
0 U# L! l( y) K. u1 |* H; M我本來也想加入XY方向的預留量.精修次數.精修量等等，可能還要再動腦
* N1 T) w+ t' ^5 U+ f/ Q3 G- L! hZ軸分層銑深的設置，想簡單的在主程序多呼叫幾次就有效果
( z; ]. ]9 v6 y% N6 {+ n8 \如：
G65P5X0.Y0.I30.R5.U2.Z-3.F300
; x- B; \, `+ K5 b/ Y+ IG65P5X0.Y0.I30.R5.U2.Z-6.F300
* g* [+ K! w- ]; f% P4 W3 DG65P5X0.Y0.I30.R5.U2.Z-9.F300
" k! O: J1 ]! [G65P5X0.Y0.I30.R5.U3.Z-10.F100(有精修的效果)
以上為基本.簡單的設置

如果最後還有內槽的外形铣削會更好，所以我這個只是理論
實際使用請當將就用，還是可以用，沒那麼多功能

xinxuan110

高手啊,顶!!!

cadme

佩服楼主，原理看的明白，但自己一直没有这个耐心。

羅蓋仙

回复 8# cadme

可能是你工作比較忙碌，還要加班沒多余的時間
我比較會忙裡偷閒，悠閒很快樂

lixuejin

确实看不懂 很少用宏