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

羅蓋仙

, ^  p: T5 ?8 K$ G5 k  k) l共同位置孔(不重複钻)會跳
, b2 i* K1 T4 O( M+ n+ o2 V
最近小弟我在研究钻孔，假設在水平上每50mm钻一孔共钻4孔
& W4 h+ `" k9 ?) Q4 _；夾杂了每40mm钻一孔共钻5孔，
但是你會發現最後一孔重疊孔，不钻它.因為有钻過了
% Y2 \# e( l! ?6 \( U% P0 T
一般人會先钻50mmX4孔之後再钻40mmX4孔....或者先钻40mmX5孔
再去钻50mmX3孔
- M3 x7 D4 _* |# s我有個怪胎的想法，先到先钻....有重複它會判斷去钻下一孔
無論要钻幾孔兩者相遇幾次不會1孔钻2次
  v" y2 Y( x( S( O! _4 r
" p% N1 b* T, |! y# Z2 `% M
O1234
5 C- x2 b% F( X# U! b* [: rG81 K0(FANUC)L0(三菱)
G65P1A0.B0.I50.J40.K8.H10.Y10.
3 P, p: _5 ~3 F" L( w/ ?* D# }& ~5 ]8 JG80

  G* U5 ]4 P. U; w8 }  Y2 {0 EA.B起始點(起角.X分為兩個)
; x8 s& q  W1 V0 x- H6 h# V' zI.J(孔距增量)
% _- J% |8 b8 W' |0 ?K.H(孔數)
Y(高度)
0 ^5 e. O* P3 a" p
3 ?4 T, u0 s& H# Q& Y! v#13=#6(孔轉移)
4 \4 X, n6 e) K% a: V! @#23=#11
7 N- X- v! u8 g) g#31=#1(起點轉移)
#32=#2
" o" L* |# U7 [' [0 k
: Q3 b  F2 \: E0 UIF[#1GT#2]GO20(如果A的起點(角)大於B.先做小B)
" v) b+ ~( h3 p) Z" z) b! [3 E7 u9 E2 x
, R6 B' H9 t8 x3 n' a7 e3 S$ z7 JN10 WH[[#13GE1.]AND[#31LE#32]]DO1(A孔數 AND #1小於或等於#2在此層次循環)
G90 X#31 Y#25
#13=#13-1.
#31=#1+#4*[#6-#13] (A+I起角更新)
IF[#32NE#31-#4]GO15 (如果B等下要钻的點.與當前A钻的同點.B演算下面.A判斷是否繼續钻)
#23=#23-1. (B孔數-1.孔)
#32=#32+#5 (B距離更新一個J增量)
3 n8 K, q% w" V6 T$ N9 KN15 END1
( P' ^5 \7 P; g5 J0 M
4 c# \3 [' P1 X( x0 K7 ]; t* dN20 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起角更新)
! K1 C/ m7 j5 r& jIF[#31NE#32-#5]GO25 (如果A等下要钻的點.與當前B钻的同點.A演算下面.B判斷是否繼續钻)
#13=#13-1. (A孔數-1.孔)
8 A% Y, b4 o) s9 \1 b& ^#31=#31+#4 (A距離更新一個I增量)
N25 END2
1 D- y% ~# A3 `( vIF[#13GE1.]GO10(A孔數未到跳回去N10)
) M" k# ]* V- z3 aIF[#23GE1.]GO20(B孔數未到跳回去N20)
M0

% `& _  V( X9 N- k  R7 D" a適用於
- l9 d1 f9 S. ?8 t& z夾杂兩種角度的圓周孔(在同一半徑上)或
+ |9 m: _0 H1 l1 u, n& k$ _+ K) r夾杂兩種孔距的直排孔(在同一水平線上)皆可參考

& k' x& {% F: \" B. R2 p/ W# ?8 B/ T有沒有懂，懂之後有更好的方式，請您指點

xinsuixue521

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

羅蓋仙

回复 2# xinsuixue521


; J9 p% E/ X- _9 ]9 j, ]4 c0 H* Z謝謝啦！小弟不敢當...不敢當

vinney777

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

1426437527

不错，学习一下啊

744439842

$ B9 x* V; p7 {0 R) |, DLZ脑子真好使，研究宏程序研究的不错。