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

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    （坐標號）
#1=3       （下刀點）
#2=0.5     （每層切深）
& q2 g4 d5 I& Y0 ~1 u' j #3=30      （加工深度）
#30=50     （圓直徑）
* B; ]. p( N# c/ t #102=2000  （轉速）
3 m5 K6 r* N) R& y, V/ r4 D #103=8     （M代碼）
+ k3 s1 F. k" P/ D( [ #104=81    （加工模式）
#21=1000   （進給）
8 [( C; A: }; w9 P& G& r #109=20    （刀半徑）
M98 P31
9 W8 l% K) c$ B (*-*-*-*-*-*-*-*-*)
X30. Y-30.
X0. Y-30.
: G# k6 {1 T& P# v; R, }* g$ `+ [9 \; E X-30. Y-30.
1 |+ K- m  k. u# C4 `# }7 k9 j6 b X-30. Y0.
X0. Y0.
X30. Y0.
6 [. v9 o* H5 |+ T4 F% B X30. Y30.
5 W+ I+ @% g4 C; Q* a X0. Y30.
X-30. Y30.
4 W7 e# u( f: X1 G, o (*-*-*-*-*-*-*-*-*)
& w/ {/ `: u  N0 l M98 P32
M30

O31
7 u, G' R- b$ P$ U" f/ ]1 v) c G80 M5
1 R- Q2 x4 L9 k. p$ p2 D) |7 W' h( h M9
G52 X0 Y0 Z0
G69
#100=FI[#100]
G91 G28 Z0
G90 G0 G#100 X0 Y0
G43 H0 Z150.
! b3 n) o6 w  @% ]6 @ M3 S#102
) ]0 l$ ?- i! V1 O M#103
IF[#104 EQ 3]GO 10
! }  a+ @9 k0 U% Z  x! s/ d IF[#104 EQ 76]GO 1
IF[#104 EQ 87]GO 1
GO 2
N1
#2=0.1
N2
G#104
IF[#4009 EQ 80]GO 3001
G98 G#104 R#1 Q#2 Z-#3 F#21 L0 K0
GO 20
N10
3 e: V" ^* j+ ? G66 P9221 A#1 B#2 C#3 D#30 F#21
3 ^3 V+ z7 X* j# {1 R5 A, k& cN20
M99

O32
IF[#4012 EQ 67]GO 1
9 Y0 T/ R! V! T9 a5 r: m" j G67
0 j5 y2 ?$ a. f; n8 z9 s$ rN1
G80 M5
" b' G8 x0 z' {# T4 L1 B2 | M9
G91 G28 Z0
M99
& ?2 _$ P5 h1 ^' C8 EN3001
#3000=1 (#104-DATA-ERROR)

O9221 (FORMAT G66 P9221 A_ B_ C_ D_ F_)
4 M% z' V. K' }* p" T IF[#1 EQ #0]GO 3001             /判斷下刀點是否傳入
+ t' \# ]' s* B6 j# R7 [3 Y IF[#2 EQ #0]GO 3002             /判斷每層切深是否傳入
IF[#3 EQ #0]GO 3003             /判斷加工深度是否傳入
( c5 v2 `& a. G: l. K, [ IF[#7 EQ #0]GO 3004             /判斷圓框直徑是否傳入
' C) h. _6 j1 E9 A% g IF[#9*1 LE 0]GO 3005            /判斷進給量是否傳入或異常
#4=#5021-#[5201+[#4014-53]*20]  /計算當前X坐標點
  e! E9 n0 ?! J2 v #5=#5022-#[5202+[#4014-53]*20]  /計算當前Y坐標點
6 X% Q8 r6 K, S* C: v  { #6=#5003 /記憶當前Z軸高度                    
#10=#1+#2                       /起始下刀深度
" I8 ~; e* O# a' a& j: A+ B IF[#10 GT #3]GO 3006            /判斷起始下刀深度是否異常
+ W( h) ?& f/ l: \ #21=#9                          /還原主程序變量
#30=#7                          /還原主程序變量
#20=#30/2-#109                  /切寬
) r+ Z7 }( T0 V; t IF[#20 LE 0]GO 3007             /判斷切寬是否異常
N1
( i* O( U# |) F; f G90 G1 Z-[#10-#2] F1500         /下刀前深度
G1 Z-#10 F100                   /到Z加工深度
G1 X[#4+#20] Y[#5] F#9          /移動至框邊
G3 X[#4+#20] Y[#5] I-#20 J0     /螺旋一圈
G0 Z-[#10-.5]                   /抬高Z軸0.5，防止框底打花
- G* J4 _; Q- g, B& [* ` G0 X#4 Y#5                       /移動至圓心位置
& H6 a4 T& Z# ~' a6 P. p IF[#10 GE #3]GO 2               /判斷加工深度是否到位
#10=#10+#2
" H+ w' s, d  D+ W IF[#10 LE #3]GO 1
! |( l6 D3 @; p7 f3 u0 A #10=#3
GO 1
N2
9 I8 C! q% [" W3 v G0 Z#6
M99
8 H% h  N7 `9 u# W8 ?0 V! s) b; DN3001
" }0 @7 ?8 _! Z+ O/ h5 g/ k #3000=1 (A-DATA-ERROR)
9 q& [& e9 [! C- a. A; U+ t8 S  mN3002
& z5 Q. j! @4 `' g: | #3000=2 (B-DATA-ERROR)
N3003
#3000=3 (C-DATA-ERROR)
N3004
#3000=4 (D-DATA-ERROR)
N3005
#3000=5 (F-DATA-ERROR)
( Y; X; |' x! @! G& Z& l  K3 g6 [0 ~N3006
#3000=6 (CHECK-#1\#2-DATA)
N3007
#3000=7 (CHECK-#30\#109-DATA)

253804985

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

空氣中的小魚

回復 3# 253804985
/ g- h$ I5 ^. K* _- W呵呵，好好學習，天天向上，你可以實現的。

空氣中的小魚

回復 5# gono9981


5 \" u% F9 p2 L7 c7 A- P$ j機床會報警，GOTO只針對于當前執行的程序有效。

bruceding

回復 5# gono9981

. x" d" w8 i" d; u
. }& E! O$ G1 W0 `3 y    不會！這個一試不就知道了還問大師！

gnx2011

一步一步來

luoxin

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

朱朱

學習了，感謝大家

朱朱

感謝樓主，學習了