一个攻丝的子程序，不一定每个设备定义是一样的。具体可以把GEWINDE子程序打开看一下，也可以发给我，帮你解释下。

分享一下我们公司的这个子程序含义

;GEWINDE FUER RUECKZUGSPROGRAMM

N10 GOTOF TXE

;LO 26.07.2011

N20 R2 =                  ;STARTPUNKT

N30 R3 =                  ;BEARBEITUNGSTIEFE

N40 R4 =                  ;VERWEILZEIT

N50 R5 =                  ;STEIGUNG (LINKS MIT - ZEICHEN)

N60 R8 =                  ;DREHZAHL 1

N70 R9 =                  ;DREHZAHL 2

N80 R10=                  ;RUECKZUGSPOSITION

N90 R98                   ;MAGAZINKLAPPE OEFFNEN = 1

;

N100 R02=                  ;STARTINGPOINT

N110 R03=                  ;MACHINING DEPHT

N120 R04=                  ;DWELLTIME REV/MIN 

N130 R5 =                  ;PITCH (LEFT WITH  - SIGN)

N140 R8 =                  ;CUTTING REVOLUTION

N150 R9 =                  ;BACKWARD REVOLUTION

N160 R10=                  ;RETREAT POSITION

N170 R98                   ;OPEN MAGAZINDOOR = 1

N180 TXE:

N190 if $p_search==1 gotof fertig       如果$p_search==1 跳转到fertig程序段

N200 g0 G64 Z=R2                        走刀到Z=R2(起始点)

;-------------------------------------------------------------

N210 R120=1                             R120赋值为1，调用UP_FREI程序中的退螺纹段

N220 R87=1                              R87赋值为1，对应UP_FREI退刀程序

N230 STOPRE                             停止预读

;

;-------------------------------------------------------------

N240 BRISK                              急加速模式

N250 G331 Z=R3 K=R5 S=R8                刚性攻丝，到Z-7，牙距0.8，转速1000

N260 g4 f=r4                            底部暂停R4(0秒)

N270 G332 Z=R2 K=R5 S=R9                刚性退丝，到Z14，牙距0.8，转速1000

N280 SOFT                               SOFT模式

;-------------------------------------------------------------

N290 IF R98==1                          如果R98==1

N300 G0 Z=R10 M=QU(56) M=QU(9) D1       早开刀库门

n310 R98=0                              R98赋值为0

N320 ELSE

N330 G0 Z=R10 D1                        快速走刀到Z30处，D1刀补

N340 ENDIF

N350 fertig:                            Fertig标记

;-------------------------------------------------------------

;

N360 STOPRE                             停止预读

N370 R120=0                             R120赋值为0，对应UP_FREI退刀程序

N380 R87=0                              R87赋值为0，对应UP_FREI退刀程序

N390 STOPRE                             停止预读

;

N400 RET                                回主程序