別得地方看到的我不會(huì)，請(qǐng)高手

253804985

是發(fā)那科加工中心宏程序。我弄了個(gè)用小刀倒大孔的倒角宏程序，然后指定了個(gè)G代碼，比如-101，然后用G101呼叫，用負(fù)號(hào)就相當(dāng)于模態(tài)呼叫，然后問題是每個(gè)孔位置都必須把變量寫全，不寫全的話它會(huì)認(rèn)為這個(gè)變量為空，如何能讓后面跟的孔位置只需要XY坐標(biāo)就行，其他變量默認(rèn)第一次的？舉個(gè)例子：用12的倒角刀倒20的孔，我讓它轉(zhuǎn)半徑6的圓G101 X0 Y0 Z-10 R1 I6 F300(Z為深度，R為進(jìn)給落刀點(diǎn)，I為轉(zhuǎn)圓的半徑）X50(就是這里不行了，要把所有變量寫全才可以）X100(就是這里不行了，要把所有變量寫全才可以）要寫成這樣才可以：G101 X0 Y0 Z-10 R1 I6 F300(Z為深度，R為進(jìn)給落刀點(diǎn)，I為轉(zhuǎn)圓的半徑）X50 Z-10 R1 I6 F300X100 Z-10 R1 I6 F300請(qǐng)高手幫忙解決下

空氣中的小魚

我給你一個(gè)類似的實(shí)例，你可以參考下，每個(gè)孔位置如果有重復(fù)的可以不用寫重復(fù)的那一個(gè)坐標(biāo)
O30
( v9 `3 P6 [0 P/ J #100=54    （坐標(biāo)號(hào)）
& H, e" H; L" Z2 o0 P3 w  d #1=3       （下刀點(diǎn)）
#2=0.5     （每層切深）
#3=30      （加工深度）
#30=50     （圓直徑）
. C! V3 D4 u0 b9 c! m #102=2000  （轉(zhuǎn)速）
+ ]' R  N& z9 a$ n/ Z0 @2 p9 { #103=8     （M代碼）
#104=81    （加工模式）
! L1 `( |7 y* d1 T) `: X #21=1000   （進(jìn)給）
" ?# g+ ~2 E1 l% U. n #109=20    （刀半徑）
M98 P31
(*-*-*-*-*-*-*-*-*)
X30. Y-30.
7 @  A1 I3 I: E; m! y% W X0. Y-30.
1 f3 Z7 l/ F- G" Q' g0 l& K% _ X-30. Y-30.
: M% g4 T/ \" k: T- C: x* z& w X-30. Y0.
X0. Y0.
X30. Y0.
$ T* B4 w# ~/ v8 o7 g' u: H X30. Y30.
' ^" Q( j4 S# V3 L6 p- w( I# Y# x X0. Y30.
X-30. Y30.
6 w- I; _8 d# @6 l0 q (*-*-*-*-*-*-*-*-*)
& M. }% C0 ^! }# X1 n M98 P32
. \* _. T9 ~! F M30

* a- ]7 K! d# ?O31
G80 M5
- k3 w9 p) Q- Y! o8 N& @+ u M9
G52 X0 Y0 Z0
G69
$ ?/ V- q% i  O9 s #100=FI[#100]
- p) q; Q. {/ m7 m1 w& k1 v  a G91 G28 Z0
G90 G0 G#100 X0 Y0
" ]1 M7 K( h# x3 v G43 H0 Z150.
M3 S#102
1 Z. q* }9 V) R8 h3 h& h M#103
4 c5 Z% i% ]. `2 I! l0 V IF[#104 EQ 3]GO 10
IF[#104 EQ 76]GO 1
IF[#104 EQ 87]GO 1
GO 2
( V" r: n+ U" ?5 D$ V7 e! UN1
#2=0.1
N2
G#104
/ o- M% N0 {8 n/ E2 ]' x) q IF[#4009 EQ 80]GO 3001
! l2 q- W3 L- E G98 G#104 R#1 Q#2 Z-#3 F#21 L0 K0
" v: ]# a6 `3 j  ]# q GO 20
6 C" r# F3 ^" ?* N5 b# vN10
* `1 p8 ~. j$ G1 C) W G66 P9221 A#1 B#2 C#3 D#30 F#21
, p# Z2 T( b, M  bN20
M99

O32
IF[#4012 EQ 67]GO 1
4 Q2 c  j2 B# V  K- P G67
+ V6 T3 D( S/ w3 ~N1
G80 M5
M9
G91 G28 Z0
M99
N3001
#3000=1 (#104-DATA-ERROR)

) l. C# r$ J( N& GO9221 (FORMAT G66 P9221 A_ B_ C_ D_ F_)
. O6 ?7 q: n, {  w; I* g IF[#1 EQ #0]GO 3001             /判斷下刀點(diǎn)是否傳入
& n' A: M, o: p  w+ N) a- I* q) a IF[#2 EQ #0]GO 3002             /判斷每層切深是否傳入
IF[#3 EQ #0]GO 3003             /判斷加工深度是否傳入
IF[#7 EQ #0]GO 3004             /判斷圓框直徑是否傳入
- i: m' V  k6 k# z% y, A' ? IF[#9*1 LE 0]GO 3005            /判斷進(jìn)給量是否傳入或異常
2 u  G2 F8 Q. v! x% S: ^* u, K2 | #4=#5021-#[5201+[#4014-53]*20]  /計(jì)算當(dāng)前X坐標(biāo)點(diǎn)
#5=#5022-#[5202+[#4014-53]*20]  /計(jì)算當(dāng)前Y坐標(biāo)點(diǎn)
#6=#5003 /記憶當(dāng)前Z軸高度                    
#10=#1+#2                       /起始下刀深度
  _& }+ _2 _" h, y IF[#10 GT #3]GO 3006            /判斷起始下刀深度是否異常
#21=#9                          /還原主程序變量
#30=#7                          /還原主程序變量
7 D! k0 _; C$ V' @# s8 J+ @% ~ #20=#30/2-#109                  /切寬
4 v0 w$ N) h0 V$ p IF[#20 LE 0]GO 3007             /判斷切寬是否異常
* h( P- e; w  y/ kN1
G90 G1 Z-[#10-#2] F1500         /下刀前深度
G1 Z-#10 F100                   /到Z加工深度
G1 X[#4+#20] Y[#5] F#9          /移動(dòng)至框邊
4 K' D* \5 e+ v G3 X[#4+#20] Y[#5] I-#20 J0     /螺旋一圈
G0 Z-[#10-.5]                   /抬高Z軸0.5，防止框底打花
G0 X#4 Y#5                       /移動(dòng)至圓心位置
IF[#10 GE #3]GO 2               /判斷加工深度是否到位
1 x+ M7 |2 Y* x% o" W( o #10=#10+#2
IF[#10 LE #3]GO 1
+ X* j) N- V" s, ^! F; i #10=#3
GO 1
N2
, E) X# h* k  k# V; v( \ G0 Z#6
M99
N3001
#3000=1 (A-DATA-ERROR)
N3002
#3000=2 (B-DATA-ERROR)
N3003
#3000=3 (C-DATA-ERROR)
" P5 h( l5 O6 Z+ a: `& w6 r. XN3004
#3000=4 (D-DATA-ERROR)
. S. u1 l& I3 r5 Z+ HN3005
, e3 u- c1 {0 J& \ #3000=5 (F-DATA-ERROR)
N3006
) _4 [+ \6 Q9 Q' N #3000=6 (CHECK-#1\#2-DATA)
+ i, q( l$ i4 M( l' hN3007
#3000=7 (CHECK-#30\#109-DATA)

253804985

謝大神，關(guān)注好久了，對(duì)你的知識(shí)就是羨慕忌妒恨啊，我什么時(shí)候才能達(dá)到啊！我基礎(chǔ)還不太好，要努力努力在努力

空氣中的小魚

回復(fù) 3# 253804985
呵呵，好好學(xué)習(xí)，天天向上，你可以實(shí)現(xiàn)的。

空氣中的小魚

回復(fù) 5# gono9981

7 ?8 W, t. F4 l" Z
( U6 y# u. d( f. L機(jī)床會(huì)報(bào)警，GOTO只針對(duì)于當(dāng)前執(zhí)行的程序有效。

bruceding

回復(fù) 5# gono9981
8 c. |& y/ w' `; F- ^' K

+ _8 T; X" }* [$ V; H" w) b    不會(huì)！這個(gè)一試不就知道了還問大師！

gnx2011

一步一步來

luoxin

誰(shuí)教教我OKUMA 車床的宏程序啊

朱朱

學(xué)習(xí)了，感謝大家

朱朱

感謝樓主，學(xué)習(xí)了