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

羅蓋仙

共同位置孔(不重複钻)會跳
* V; c; c5 c8 Z5 n8 R
最近小弟我在研究钻孔，假設在水平上每50mm钻一孔共钻4孔
; A9 U  _7 U0 g7 E( _2 ^6 f+ a；夾杂了每40mm钻一孔共钻5孔，
+ q5 E* G: K* |6 s7 i但是你會發現最後一孔重疊孔，不钻它.因為有钻過了

一般人會先钻50mmX4孔之後再钻40mmX4孔....或者先钻40mmX5孔
$ L% U9 u* N1 J( z再去钻50mmX3孔
9 K* k) x6 z$ v; ?; v+ L' p9 H我有個怪胎的想法，先到先钻....有重複它會判斷去钻下一孔
" n' E3 q. G' v無論要钻幾孔兩者相遇幾次不會1孔钻2次


O1234
5 _) c; J) M  R8 fG81 K0(FANUC)L0(三菱)
9 J: [. Q$ R6 u4 z: p" vG65P1A0.B0.I50.J40.K8.H10.Y10.
G80
* o+ g4 S& u6 S& a0 R7 X0 H
, \) d' P0 C( ^8 H) mA.B起始點(起角.X分為兩個)
6 }/ e) `7 o) @* y3 lI.J(孔距增量)
+ q& T/ j, H7 ?1 t0 ]" `K.H(孔數)
8 y9 [7 R! y- T; Q- ?! b: PY(高度)

! B' R+ u0 X6 ]  p- S+ }. P3 S) w#13=#6(孔轉移)
8 ?- ~' a; K: L. Q7 C#23=#11
) K+ V; B& F2 e0 A' c0 ~#31=#1(起點轉移)
" Y7 E$ o: J9 D* o& W#32=#2

IF[#1GT#2]GO20(如果A的起點(角)大於B.先做小B)

' A! ?0 v6 u8 C/ f7 m7 pN10 WH[[#13GE1.]AND[#31LE#32]]DO1(A孔數 AND #1小於或等於#2在此層次循環)
7 h2 b8 U& p( p8 J; D" p' }0 LG90 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.孔)
2 B! c/ F  a, D#32=#32+#5 (B距離更新一個J增量)
; }& I' a" X! O! E! c+ j# ]0 sN15 END1
% R$ E9 P; F6 K9 i
2 @! ~( E( ?: W; z3 r* WN20 WH[[#23GE1.]AND[#32LE#31]]DO2(B孔數 AND #2小於或等於#1在此層次循環)
1 C, y" l' i  i0 ]G90 X#32 Y#25
: p; M0 }0 M/ ^* u+ o; ?6 [#23=#23-1.
. y. w3 v1 X# \0 |* P#32=#2+#5*[#11-#23] (B+J起角更新)
IF[#31NE#32-#5]GO25 (如果A等下要钻的點.與當前B钻的同點.A演算下面.B判斷是否繼續钻)
' f- R& D+ I  _% V% q  i1 b#13=#13-1. (A孔數-1.孔)
#31=#31+#4 (A距離更新一個I增量)
N25 END2
- E: s8 F. U2 ~: I2 Z' GIF[#13GE1.]GO10(A孔數未到跳回去N10)
' T& J5 ~% W$ C$ X' |) W$ ~  ~IF[#23GE1.]GO20(B孔數未到跳回去N20)
M0
' P. t5 `- d7 k0 A' U7 X" I: b
) X9 {5 }( S9 {6 U7 L# v適用於
夾杂兩種角度的圓周孔(在同一半徑上)或
+ a$ E3 ~" }3 q$ a% j夾杂兩種孔距的直排孔(在同一水平線上)皆可參考
2 I$ E# f/ _# R
7 q' S6 n: ]% `% \5 l( r有沒有懂，懂之後有更好的方式，請您指點

xinsuixue521

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

羅蓋仙

回复 2# xinsuixue521
0 p$ E6 }8 C7 R1 j/ y

+ f( y) I* u4 m6 ~謝謝啦！小弟不敢當...不敢當

vinney777

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

1426437527

不错，学习一下啊

744439842

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