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

羅蓋仙

# i* d2 m: M- x" M' M1 |$ M1 s共同位置孔(不重複钻)會跳

最近小弟我在研究钻孔，假設在水平上每50mm钻一孔共钻4孔
；夾杂了每40mm钻一孔共钻5孔，
" G5 L9 P9 S7 M+ M( I$ \/ l* s但是你會發現最後一孔重疊孔，不钻它.因為有钻過了

6 [0 ^- C8 g3 J. `3 e一般人會先钻50mmX4孔之後再钻40mmX4孔....或者先钻40mmX5孔
, J; a& b. b* |: J再去钻50mmX3孔
我有個怪胎的想法，先到先钻....有重複它會判斷去钻下一孔
) n) ^* F' I! {$ R) d: H無論要钻幾孔兩者相遇幾次不會1孔钻2次

8 `3 ^. S) u7 Q" P( d
; L1 G) S  v( e; e! w0 R' ?O1234
G81 K0(FANUC)L0(三菱)
G65P1A0.B0.I50.J40.K8.H10.Y10.
9 ~$ I. t8 Y. Q4 D# g2 YG80

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

#13=#6(孔轉移)
' w2 s, r) x+ ^( v' |4 m#23=#11
#31=#1(起點轉移)
#32=#2
* \, f8 {& V. k3 ^4 N
IF[#1GT#2]GO20(如果A的起點(角)大於B.先做小B)
, z% R' M; z* D: s" G
5 _2 h) g- }4 d2 y" k) r9 K; vN10 WH[[#13GE1.]AND[#31LE#32]]DO1(A孔數 AND #1小於或等於#2在此層次循環)
/ c/ E- S& e/ L- A! o3 u; CG90 X#31 Y#25
) z& D8 l/ d, H! P#13=#13-1.
9 K4 `' w5 z/ S& U/ l#31=#1+#4*[#6-#13] (A+I起角更新)
' H1 S; w. f- O" G1 e" uIF[#32NE#31-#4]GO15 (如果B等下要钻的點.與當前A钻的同點.B演算下面.A判斷是否繼續钻)
#23=#23-1. (B孔數-1.孔)
#32=#32+#5 (B距離更新一個J增量)
- Z  c; [5 W# i, Q* i) G( P6 SN15 END1
7 n6 b9 l- u) p/ X- b. g0 ^
N20 WH[[#23GE1.]AND[#32LE#31]]DO2(B孔數 AND #2小於或等於#1在此層次循環)
1 S- D% l* e" W0 X: G" R1 ]G90 X#32 Y#25
#23=#23-1.
#32=#2+#5*[#11-#23] (B+J起角更新)
$ o* S2 m) E; pIF[#31NE#32-#5]GO25 (如果A等下要钻的點.與當前B钻的同點.A演算下面.B判斷是否繼續钻)
# I- y) |/ k! w#13=#13-1. (A孔數-1.孔)
#31=#31+#4 (A距離更新一個I增量)
; W* D. Q) o# H. G& N. ?N25 END2
" o% x& u$ |6 E+ {7 Y/ x9 vIF[#13GE1.]GO10(A孔數未到跳回去N10)
9 C7 e. h/ m5 J% sIF[#23GE1.]GO20(B孔數未到跳回去N20)
M0
# D5 e9 \$ a' g: J
* F8 C( R0 o1 @% @: Y0 d9 U; |# i. t適用於
夾杂兩種角度的圓周孔(在同一半徑上)或
夾杂兩種孔距的直排孔(在同一水平線上)皆可參考

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

xinsuixue521

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

羅蓋仙

回复 2# xinsuixue521

( x$ s: R7 O3 N; I' a2 E  O
謝謝啦！小弟不敢當...不敢當

vinney777

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

1426437527

不错，学习一下啊

744439842

- k. i) x9 c& v& B3 fLZ脑子真好使，研究宏程序研究的不错。