螺旋下刀宏程序

少年游

最近，为方便车间加工，编制了一个宏程序。该程序可以使用模态调用（G66/G67），将几个Z轴坐标相同的孔连接在一起加工。发到社区同大家分享。
IF[#17EQ#0]GOTO0999;
3 u' P9 p! q' ^  u#105=#5003;
% x# h$ k% Z( x$ j7 q5 m0 ^IF[#20GE#7]GOTO0999
#111=[#7-#20]/2.0
* }1 h2 j- u0 Z! o1 m: [IF[#18EQ#0]THEN#18=#5003  
#112=#18
5 I5 j1 k3 E2 c) BZ#18
IF[#11NE#0]GOTO1
9 a1 e' Y* M3 @4 W0 d. i& B+ mGOTO02
; R4 J! }0 {- b4 oN1
) L7 c) g; T  S( M" O9 N1 @IF[#26NE#0]GOTO999  
#11=ABS[#11]
#26=#18-#11   
! D5 L) m2 m* b N2
#115=#112-#17  
#102=#115
G91 G01 Y-#111  
N3
WHILE[#102GE#26]DO01  
: |9 z' o$ S$ m- s, RG90 G03 J#111 Z#115
! F( m5 j7 E  y4 S#115=#115-#17
+ u$ @2 C3 g' `/ \#102=#115
  o' @. O1 L  e1 \/ \END01
* m' F! H& q3 `+ L# c6 N#121=#102+#17
% t8 R1 T7 i9 E7 {* Y+ x( }IF[#121EQ#26]GOTO05  
. `( W% ~2 p! \* {8 B/ s1 AG90 G03 J#111 Z#26
6 T/ b/ z2 I! J9 \( n) x. EN5
G90 G03 J#111
4 b% F  x7 }9 I" g8 k% h/ z8 QG91 G01 Y#111
, m5 N0 L2 e; u2 rGOTO08
N999
#300=1
/ f/ V9 l' C3 {' f: {) ZN8
6 w1 f6 ?  {( [% Y1 |G90 G00 Z#105  
D（直径）T（刀径）Q（每层步进值） Z（H）孔底坐标值（从R点到底孔深度）R（安全高度从R点开始执行G01）
+ \, y7 D3 _6 {注：Z值和H值只能取其一
没有R值从起刀点开始加工
0 V% @7 C! w* L: u

韩寒11

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

少年游

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

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

少年游

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

这只是一个螺旋下刀转圆程序，相信有一定宏程序编辑能力的人，理解起来并不是难事。