別得地方看到的我不會，請高手

253804985

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

空氣中的小魚

我給你一個類似的實例，你可以參考下，每個孔位置如果有重復的可以不用寫重復的那一個坐標
O30
#100=54    （坐標號）
. F2 z$ H1 e2 L) q #1=3       （下刀點）
; \4 T2 C) M! x9 ]% E' h #2=0.5     （每層切深）
, f* M- ?! [; C5 T; E$ g #3=30      （加工深度）
6 Y+ K2 m, g, n; ]$ E #30=50     （圓直徑）
#102=2000  （轉速）
#103=8     （M代碼）
#104=81    （加工模式）
3 f# i3 B+ ]; a/ R #21=1000   （進給）
#109=20    （刀半徑）
- }& l7 K: _1 J0 h/ | M98 P31
% D# x" y3 h9 Q0 _. l8 H (*-*-*-*-*-*-*-*-*)
! c+ ]) m6 g* U X30. Y-30.
X0. Y-30.
- I* q& D# p4 K. S X-30. Y-30.
X-30. Y0.
X0. Y0.
X30. Y0.
6 Y/ a# B1 p9 U$ K X30. Y30.
$ j8 A% O/ Z8 i X0. Y30.
( Y7 P! a; v5 B/ M# u X-30. Y30.
(*-*-*-*-*-*-*-*-*)
3 o2 |6 K9 o& x M98 P32
M30

$ q3 W2 s5 v. s7 K* qO31
G80 M5
M9
$ r0 g$ W1 t4 M! o" A  F G52 X0 Y0 Z0
G69
#100=FI[#100]
G91 G28 Z0
. q* ^6 S; g8 a G90 G0 G#100 X0 Y0
G43 H0 Z150.
M3 S#102
M#103
( U- P$ G! E& J IF[#104 EQ 3]GO 10
IF[#104 EQ 76]GO 1
# Y2 ^5 z. U+ C8 ? IF[#104 EQ 87]GO 1
/ n9 r5 I* X. e, o GO 2
N1
' T7 N4 N. ^- a/ Z #2=0.1
; H% z0 b$ c6 l) c+ I' o( MN2
G#104
. S9 Q" B+ `: U- P5 |7 e IF[#4009 EQ 80]GO 3001
G98 G#104 R#1 Q#2 Z-#3 F#21 L0 K0
GO 20
N10
G66 P9221 A#1 B#2 C#3 D#30 F#21
# u( K3 Z2 o: A: m! K% f- XN20
M99
" L( W! i3 b( P- W9 e
O32
2 G3 h' h+ v2 d4 j# G/ B IF[#4012 EQ 67]GO 1
3 Y! a3 I/ _' d  }- u G67
N1
G80 M5
4 E% }, z! ~& {9 Q M9
G91 G28 Z0
M99
N3001
' v6 O: B  j* ^7 _7 B #3000=1 (#104-DATA-ERROR)
, j3 M+ F  v9 O
O9221 (FORMAT G66 P9221 A_ B_ C_ D_ F_)
: X( z& }, \! |( o1 _! I5 ?  V2 t IF[#1 EQ #0]GO 3001             /判斷下刀點是否傳入
IF[#2 EQ #0]GO 3002             /判斷每層切深是否傳入
IF[#3 EQ #0]GO 3003             /判斷加工深度是否傳入
IF[#7 EQ #0]GO 3004             /判斷圓框直徑是否傳入
% Q/ t: D% b9 ?, Q3 _/ B) p IF[#9*1 LE 0]GO 3005            /判斷進給量是否傳入或異常
#4=#5021-#[5201+[#4014-53]*20]  /計算當前X坐標點
#5=#5022-#[5202+[#4014-53]*20]  /計算當前Y坐標點
#6=#5003 /記憶當前Z軸高度                    
; W7 K: H! f3 V, m* i; p) ?$ [: C2 ? #10=#1+#2                       /起始下刀深度
IF[#10 GT #3]GO 3006            /判斷起始下刀深度是否異常
#21=#9                          /還原主程序變量
( J: O+ Y; e7 h3 E/ t #30=#7                          /還原主程序變量
#20=#30/2-#109                  /切寬
- F3 C; f, B4 u/ K# i IF[#20 LE 0]GO 3007             /判斷切寬是否異常
N1
6 B5 k) ]! N5 L, f4 ?4 k3 N G90 G1 Z-[#10-#2] F1500         /下刀前深度
G1 Z-#10 F100                   /到Z加工深度
G1 X[#4+#20] Y[#5] F#9          /移動至框邊
2 p7 g/ S3 F, @8 N3 O& @- b G3 X[#4+#20] Y[#5] I-#20 J0     /螺旋一圈
G0 Z-[#10-.5]                   /抬高Z軸0.5，防止框底打花
G0 X#4 Y#5                       /移動至圓心位置
; _# G* f0 l! F1 v IF[#10 GE #3]GO 2               /判斷加工深度是否到位
#10=#10+#2
IF[#10 LE #3]GO 1
8 s9 G4 j) Y* q9 ]4 S; E0 x, o #10=#3
GO 1
N2
3 l. ~6 C3 j# Z! c7 K( S) [ G0 Z#6
+ N( `! E1 J# x/ Q9 n; f& ~ M99
+ W" o: }! l4 b2 X5 @3 }N3001
- F; A2 D3 Q4 I$ \ #3000=1 (A-DATA-ERROR)
5 H+ x; F8 c  C8 QN3002
. H3 T; T( Z( [$ B% { #3000=2 (B-DATA-ERROR)
5 [0 ]* y, K- O  a5 Q- f9 _" `% IN3003
7 }9 J- h+ J, K5 I! R# a1 Q, n$ | #3000=3 (C-DATA-ERROR)
N3004
# r  P! v; s0 Q4 k- e #3000=4 (D-DATA-ERROR)
N3005
#3000=5 (F-DATA-ERROR)
! f0 V( f- U# Q  xN3006
#3000=6 (CHECK-#1\#2-DATA)
$ \0 a% M: [  ]: K- Y3 mN3007
#3000=7 (CHECK-#30\#109-DATA)

253804985

謝大神，關注好久了，對你的知識就是羨慕忌妒恨啊，我什么時候才能達到啊！我基礎還不太好，要努力努力在努力

空氣中的小魚

回復 3# 253804985
/ ]( K& X. I7 z4 e( \2 a2 l呵呵，好好學習，天天向上，你可以實現的。

空氣中的小魚

回復 5# gono9981
, `2 y4 l! H. f; q. H& M% J

機床會報警，GOTO只針對于當前執行的程序有效。

bruceding

回復 5# gono9981

! ]3 [9 Y' |! w/ j; {& q
8 U7 d/ y/ ?$ T) _    不會！這個一試不就知道了還問大師！

gnx2011

一步一步來

luoxin

誰教教我OKUMA 車床的宏程序啊

朱朱

學習了，感謝大家

朱朱

感謝樓主，學習了