螺旋下刀宏程序

少年游

最近，为方便车间加工，编制了一个宏程序。该程序可以使用模态调用（G66/G67），将几个Z轴坐标相同的孔连接在一起加工。发到社区同大家分享。
IF[#17EQ#0]GOTO0999;
#105=#5003;
IF[#20GE#7]GOTO0999
) O4 Z( {$ ]; a/ [# ]" ]#111=[#7-#20]/2.0
IF[#18EQ#0]THEN#18=#5003  
4 G; L1 `4 x- ~#112=#18
Z#18
' ]' H8 U4 d- q( t; \0 z  rIF[#11NE#0]GOTO1
GOTO02
% P0 p" A% T& g5 U7 f8 m" u; i0 FN1
, t. s. R- m- }# NIF[#26NE#0]GOTO999  
- |: I: l# a3 `. L9 B#11=ABS[#11]
#26=#18-#11   
N2
#115=#112-#17  
#102=#115
G91 G01 Y-#111  
N3
WHILE[#102GE#26]DO01  
0 B  i) p+ d* J) RG90 G03 J#111 Z#115
#115=#115-#17
  }% ~0 ?% d0 F5 u( t( c( @#102=#115
END01
4 S+ \! H/ R+ z! z  u#121=#102+#17
IF[#121EQ#26]GOTO05  
; s6 A2 K- `0 {* e" dG90 G03 J#111 Z#26
4 M( ?2 ?4 m+ L- ^, |N5
1 t* T  |+ E1 `" J8 u% HG90 G03 J#111
$ s- N; l4 v/ ~G91 G01 Y#111
" g- Y$ z: Y' R4 j5 i/ d6 EGOTO08
N999
" u, z8 S& \" P4 c: L0 T( e3 T#300=1
0 j& I4 t2 N% K* x4 ~( `N8
G90 G00 Z#105  
! c4 y" y7 T  B( O5 j/ LD（直径）T（刀径）Q（每层步进值） Z（H）孔底坐标值（从R点到底孔深度）R（安全高度从R点开始执行G01）
注：Z值和H值只能取其一
没有R值从起刀点开始加工

韩寒11

#17，#18，#20等几个对应的尺寸是多少应该提供一下，便于大家通过公式来验证

少年游

韩寒11 发表于 2020-5-1 20:50
#17，#18，#20等几个对应的尺寸是多少应该提供一下，便于大家通过公式来验证

您说的这些是宏变量。可以参照FANUC说明书。

少年游

韩寒11 发表于 2020-5-1 20:50
; d1 S2 M! A7 g  T#17，#18，#20等几个对应的尺寸是多少应该提供一下，便于大家通过公式来验证

) w; k3 @3 P1 r) [0 {! L  v这只是一个螺旋下刀转圆程序，相信有一定宏程序编辑能力的人，理解起来并不是难事。