夾杂兩種孔，當共同位置時，不會重複钻會跳

羅蓋仙

共同位置孔(不重複钻)會跳

最近小弟我在研究钻孔，假設在水平上每50mm钻一孔共钻4孔
9 G# p1 }. `* D* D；夾杂了每40mm钻一孔共钻5孔，
但是你會發現最後一孔重疊孔，不钻它.因為有钻過了
; g) R; j& i$ V+ H
一般人會先钻50mmX4孔之後再钻40mmX4孔....或者先钻40mmX5孔
再去钻50mmX3孔
5 Z: u2 s; K1 I$ ]; J, _我有個怪胎的想法，先到先钻....有重複它會判斷去钻下一孔
* v5 L/ q: S& k: V7 K4 R+ y2 F, w無論要钻幾孔兩者相遇幾次不會1孔钻2次
/ d  x3 p. D: d' N, M! L; I# b
. x# k4 U( L  U% P) d: o
O1234
G81 K0(FANUC)L0(三菱)
, h1 Y1 w- L3 CG65P1A0.B0.I50.J40.K8.H10.Y10.
G80

/ v9 o* D6 u0 C" a, F& |7 z% KA.B起始點(起角.X分為兩個)
I.J(孔距增量)
0 \6 R  g& l% i1 C7 d: f. cK.H(孔數)
2 V  Q( z# T) R; j" |- oY(高度)
* X, l+ m* n2 ]! w& x  @
! \( M& M! Z4 ^#13=#6(孔轉移)
" {4 N$ \. G4 K) S, F) \#23=#11
; t3 ^5 J; d  Y0 g9 f  d#31=#1(起點轉移)
#32=#2
) R+ c# S$ ]) P" |1 Y+ d
IF[#1GT#2]GO20(如果A的起點(角)大於B.先做小B)
5 i% b: U0 g5 F% K
N10 WH[[#13GE1.]AND[#31LE#32]]DO1(A孔數 AND #1小於或等於#2在此層次循環)
G90 X#31 Y#25
4 b$ w% T4 l( v4 I$ T6 V& h% |* [#13=#13-1.
) Y  I5 p  Y. d$ X, q/ g#31=#1+#4*[#6-#13] (A+I起角更新)
# k. ^- T' e+ t2 b* d* R8 iIF[#32NE#31-#4]GO15 (如果B等下要钻的點.與當前A钻的同點.B演算下面.A判斷是否繼續钻)
#23=#23-1. (B孔數-1.孔)
) L9 H; F, w- b0 _1 n  e, W#32=#32+#5 (B距離更新一個J增量)
N15 END1

N20 WH[[#23GE1.]AND[#32LE#31]]DO2(B孔數 AND #2小於或等於#1在此層次循環)
G90 X#32 Y#25
#23=#23-1.
; a; W- H! {: ^9 w. B6 j+ \: n( K. X& g#32=#2+#5*[#11-#23] (B+J起角更新)
IF[#31NE#32-#5]GO25 (如果A等下要钻的點.與當前B钻的同點.A演算下面.B判斷是否繼續钻)
#13=#13-1. (A孔數-1.孔)
, ~* m( G4 V3 r& g6 n#31=#31+#4 (A距離更新一個I增量)
N25 END2
IF[#13GE1.]GO10(A孔數未到跳回去N10)
IF[#23GE1.]GO20(B孔數未到跳回去N20)
+ e3 G. R- ?) i6 Y2 T+ L/ m6 nM0
4 n% t8 ^1 C9 D2 U$ V
適用於
2 w7 U# P& G. n8 A' C( k' y1 D夾杂兩種角度的圓周孔(在同一半徑上)或
8 E2 `  E/ ^  [# K; l. p* u夾杂兩種孔距的直排孔(在同一水平線上)皆可參考
; L0 d* d3 i; }* }" i
有沒有懂，懂之後有更好的方式，請您指點

xinsuixue521

LZ脑子真好使，研究宏程序研究的不错。

羅蓋仙

回复 2# xinsuixue521
' z2 ?: d% C4 `+ J& u3 r
5 F( {- v6 T% U5 {! w4 R1 b
; e  \7 v* Z2 s, W& [+ \# z* g$ w' D謝謝啦！小弟不敢當...不敢當

vinney777

不错，学习，不过此种想法很难在软件上自动实现

1426437527

不错，学习一下啊

744439842

LZ脑子真好使，研究宏程序研究的不错。