宏程序.谁帮我逐句解释一下呢.G0X60Z5#1=1#9=5WHILE[#1LE10]D01#2=0WHILE{#2LE180}D02#3=#1*SIN[#2]#4=2*COS[#2]#5=40-#3*2G0X#5Z#4G32Z-80F30J0G0X60Z#4#2=#2+#9END2G0X60Z5#1=#1+0.5IF[#1GE4]THEN9=2IF[#1GE7]THEN9=1IF[#1GE9]THEN9=0.2END1M30G0X60

Question

宏程序.谁帮我逐句解释一下呢.
G0 X60 Z5#1=1#9=5WHILE[#1LE10]D01#2=0WHILE{#2LE180}D02#3=#1*SIN[#2]#4=2*COS[#2]#5=40-#3*2G0X#5Z#4 G32Z-80F30J0G0X60Z#4#2=#2+#9END2G0X60Z5#1=#1+0.5IF[#1GE4]THEN9=2IF[#1GE7]THEN9=1IF[#1GE9]THEN9=0.2END1M30
G0 X60 Z5
#1=1
#9=5
WHILE[#1LE10]D01
#2=0
WHILE{#2LE180}D02
#3=#1*SIN[#2]
#4=2*COS[#2]
#5=40-#3*2
G0X#5
Z#4
G32Z-80F30J0
G0X60
Z#4
#2=#2+#9
END2
G0X60Z5
#1=#1+0.5
IF[#1GE4]THEN9=2
IF[#1GE7]THEN9=1
IF[#1GE9]THEN9=0.2
END1
M30
这样直观点

Answer 1

分层车椭圆牙型的螺纹,分层走刀路线基本就是下图

G0 X60 Z5
#1=1                  椭圆的一个半轴
#9=5                  自变量增加值为5度
WHILE[#1LE10]D01    当#1小于等于10时执行END1之间的程序
#2=0                  初始自变量0度
WHILE[#2LE180]D02   当#2小于180度时执行END2之间的程序
#3=#1*SIN[#2]         计算椭圆上点的坐标X的值
#4=2*COS[#2]         计算椭圆上点的坐标Z的值
#5=40-#3*2            平移椭圆到需要的位置,#3*2为这一点的直径
G0X#5                快速定位X
Z#4                  快速定位Z
 G32Z-80F30J0         走螺纹

G0X60                退刀
Z#4                   退刀
#2=#2+#9              自变量增加
END2
G0X60Z5               快速定位
#1=#1+0.5              椭圆的一个半轴增加0.5,也就是每层走0.5
IF[#1GE4]THEN #9=2    如果#1大于等于4自变量增加值就变为2度
IF[#1GE7]THEN #9=1    如果#1大于等于7自变量增加值就变为1度
IF[#1GE9]THEN #9=0.2  如果#1大于等于9自变量增加值就变为0.2度
END1
M30                   程序结束