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

羅蓋仙

5 I! A( e# \4 l' K' z6 T9 \2 z共同位置孔(不重複钻)會跳
& W' i1 e* ?6 Y5 Q+ s
最近小弟我在研究钻孔，假設在水平上每50mm钻一孔共钻4孔
/ _9 H' _' |" e8 w% _/ Y；夾杂了每40mm钻一孔共钻5孔，
5 u5 u" q8 l; L* J/ q0 v但是你會發現最後一孔重疊孔，不钻它.因為有钻過了
3 c  n8 \2 E& v' N; }, E3 m9 g( J
一般人會先钻50mmX4孔之後再钻40mmX4孔....或者先钻40mmX5孔
再去钻50mmX3孔
* H" |: q8 j7 x0 Z8 ^我有個怪胎的想法，先到先钻....有重複它會判斷去钻下一孔
7 ]1 J$ E. E! i6 H無論要钻幾孔兩者相遇幾次不會1孔钻2次
0 E0 E0 W& E0 M% v- o2 e
3 I- H9 K5 D6 D0 W2 o0 [% M# j
9 B7 H6 ], B% f4 @. nO1234
G81 K0(FANUC)L0(三菱)
8 d% g8 V! o4 C; z! qG65P1A0.B0.I50.J40.K8.H10.Y10.
7 [! k6 @6 Z/ ?  y( ZG80

A.B起始點(起角.X分為兩個)
I.J(孔距增量)
K.H(孔數)
Y(高度)

#13=#6(孔轉移)
; B! {7 X4 s0 n0 C3 A' g0 G#23=#11
#31=#1(起點轉移)
#32=#2

; ^' L! w! K/ CIF[#1GT#2]GO20(如果A的起點(角)大於B.先做小B)
+ t! e; B* u2 n7 U' Z4 j2 P& b
+ i5 E7 b( ^2 s9 SN10 WH[[#13GE1.]AND[#31LE#32]]DO1(A孔數 AND #1小於或等於#2在此層次循環)
6 u' y5 q5 x9 t5 ~. v7 QG90 X#31 Y#25
- t# U1 O; H- ?3 u4 k5 T! D#13=#13-1.
#31=#1+#4*[#6-#13] (A+I起角更新)
3 Z" a& [! i( a/ d1 l9 n+ S2 ?4 _IF[#32NE#31-#4]GO15 (如果B等下要钻的點.與當前A钻的同點.B演算下面.A判斷是否繼續钻)
+ \# m) ]' o4 {8 ]. T% l#23=#23-1. (B孔數-1.孔)
2 L; n! [! M2 P, S& v) z#32=#32+#5 (B距離更新一個J增量)
N15 END1
3 v0 r9 t, O7 F
N20 WH[[#23GE1.]AND[#32LE#31]]DO2(B孔數 AND #2小於或等於#1在此層次循環)
G90 X#32 Y#25
#23=#23-1.
#32=#2+#5*[#11-#23] (B+J起角更新)
IF[#31NE#32-#5]GO25 (如果A等下要钻的點.與當前B钻的同點.A演算下面.B判斷是否繼續钻)
#13=#13-1. (A孔數-1.孔)
! i" u1 u/ V% ], R#31=#31+#4 (A距離更新一個I增量)
N25 END2
  t' m! D: _6 W& Z) s* AIF[#13GE1.]GO10(A孔數未到跳回去N10)
9 p* H: k$ O5 U) E" s' m7 V6 g$ b' FIF[#23GE1.]GO20(B孔數未到跳回去N20)
# i& Q( B  w6 ~0 @+ d% h4 Y# gM0

3 k& y) L# h6 c適用於
7 J) M( r5 P, ^. e$ n夾杂兩種角度的圓周孔(在同一半徑上)或
+ {% E' ?) @$ k* Q  V. M3 B. z夾杂兩種孔距的直排孔(在同一水平線上)皆可參考

有沒有懂，懂之後有更好的方式，請您指點

xinsuixue521

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

羅蓋仙

回复 2# xinsuixue521
- t1 k* |- y1 j; `- k- t' f7 g
3 [: n8 G- `3 w1 W  X
謝謝啦！小弟不敢當...不敢當

vinney777

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

1426437527

不错，学习一下啊

744439842

4 Z' v0 p) [& |$ I/ v, fLZ脑子真好使，研究宏程序研究的不错。