主程序：

N100 DEF INT HK0

N200 DEF INT HK1

N300 DEF INT HK2

N400 DEF INT HK3

N500 DEF INT HK5

N600 DEF INT HK4

N700 G90G94G500        

N1100 PRESETON(A,0)   

N1300 R13=135          ;总齿数

N1600 R16=1000          ;分度速度

N1700 R18=0            ;已加工齿数

N1800 R19=5           ;跳齿数

N1900 R20=135            ;加工齿数

N4100 HK1=1

N4200 HK5=R18+1

N4300 R23=360/R13

N4800 MSG("角度分配")

CHIFD1

N6900 FOR HK4=R18+1 TO R20

N7000 R79=HK5

N7300 MSG("准备加工第"<<R[100+HK5]<<"齿，加工齿数"<<R79<<"总加工齿数"<<R20)

N7400 G01 A=ACN(R[500+HK5]) F=R16

N7500 MSG("正在加工第"<<R[100+HK5]<<"齿，加工齿数"<<R79<<"总加工齿数"<<R20)

N7800 加工一个齿的程序省略了

N9000 HK5=HK5+1

N9200 ENDFOR

N9400         IF R79>=R20 GOTOF END6

N10700 END6: MSG("加工齿数完成")

N10800 G4F1

N10900 GOTOF END10

N11000 END7: MSG("加工完成")

N11100 G4F1

N11200 END10:

N11800 M2

CHIFD1.spf

N100 DEF INT HK0

N200 DEF INT HK1

N300 DEF INT HK2

N400 DEF INT HK3

N500 HK1=1

N600 FOR HK2=1 TO R19+1

N700     FOR HK3=1 TO R13

N800     HK0=HK2+(1+R19)*(HK3-1)

N900  IF HK0>R13 GOTOF STA1

N1000 R[100+HK1]=HK0

N1100 R[500+HK1]=(R[100+HK1]-1)*R23

N1200       STA4:IF R[500+HK1]<360 GOTOF STA5

N1300            R[500+HK1]=R[500+HK1]-360

N1400            GOTOB STA4

N1500 STA5:R[500+HK1]=360-R[500+HK1]

N1600       STA6: IF R[500+HK1]<360 GOTOF STA7

N1700             R[500+HK1]=R[500+HK1]-360

N1800             GOTOB STA6

N1900 STA7:

N2000 HK1=HK1+1

N2100 R99=R98+1

N2200 STA1:R98=R98+1

N2300 ENDFOR

N2400 ENDFOR

N2500 G04F2

N2600 RET

上面一个跳齿循环程序，谁能帮助理解一下，谢谢