Cimatron 后置处理技术

*-----save first tool number 保存刀具号 FirstTool = CURR_TOOL ; LastTool = CURR_TOOL ;

*-----tool cutter compensation register number 保存刀补号 CutterComp = CURR_TOOL + DiaComp ;

*-----assuming 1st tool is in the spindle, there is no need

* for tool change) 输出了T01，如果没有换刀功能，删除后面几行 OUTPUT $ \

*-----more then one tool in this run of the Post Processor IF_SET (NEXT_TOOL _NE_ CURR_TOOL) OUTPUT $ \ END_IF ;

*-----standard tool change commands. (assuming 1st tool is in

* 程序头的标准语名，如果要增加G54等指令，可直接输入到这一位置 OUTPUT $ \

OUTPUT $ \G43 H\CURR_TOOL \Z\Zhome \S\SPIN_SPEED \\SPIN_DIR ;

产生类似于G43 H1 Z50 S300 M3 的一行代码 TOOL CHANGE: 加工过程中的换刀

SET_ON SPIN_SPEED SPIN_DIR ;

*-----tool cutter compensation register number

CutterComp = CURR_TOOL + DiaComp ;

*-----tool change command (by using an internal tool change * subroutine)

OUTPUT $ \ ChangeTool ; OUTPUT $ \

*-----standard tool change commands. (assuming 1st tool is in OUTPUT $ \

OUTPUT $ \G43 H\CURR_TOOL \Z\Zhome \S\SPIN_SPEED \\SPIN_DIR ;

TOOL CHANGE: LAST: 最后换刀

SET_ON SPIN_SPEED SPIN_DIR ; *-----save last tool number

LastTool = CURR_TOOL ;

*-----tool cutter compensation register number

CutterComp = CURR_TOOL + DiaComp ;

OUTPUT $ \ ChangeTool ;

*-----the last tool is the same as the first tool

IF_SET (NEXT_TOOL _NE_ CURR_TOOL) OUTPUT $ \ END_IF ;

*-----standard tool change commands. (assuming 1st tool is in OUTPUT $ \

OUTPUT $ \G43 H\CURR_TOOL \Z\Zhome \S\SPIN_SPEED \\SPIN_DIR ;

******************************************************** LINEAR MOTION: FAST: G00 的输出格式 FlagSpin = NO ;

IF_SET (SPIN_SPEED) FlagSpin = YES ; END_IF ; IF_SET (SPIN_DIR) FlagSpin = YES ; END_IF ; IF_SET (FlagSpin _EQ_ YES) SET_ON SPIN_SPEED SPIN_DIR ;

OUTPUT $ \ END_IF ;

OUTPUT $ ;

IF_SET (LIN_MOV) OUTPUT \ ; END_IF ; IF_SET (X_CURPOS) OUTPUT \ IF_SET (Y_CURPOS) OUTPUT \ IF_SET (Z_CURPOS) OUTPUT \ IF_SET (MCH_COOL) OUTPUT \ SET_ON CIRC_MOV NURBS_MOV ; Xold = X_CURPOS ; Yold = Y_CURPOS ; Zold = Z_CURPOS ;

LINEAR MOTION: G01的输出格式 FlagSpin = NO ;

IF_SET (SPIN_SPEED) FlagSpin = YES ; END_IF ; IF_SET (SPIN_DIR) FlagSpin = YES ; END_IF ; IF_SET (FlagSpin _EQ_ YES) SET_ON SPIN_SPEED SPIN_DIR ;

OUTPUT $ \ END_IF ;

OUTPUT $ ;

IF_SET (LIN_MOV) OUTPUT \ LIN_MOV ; END_IF ;

IF_SET (CUTCOM_ON) OUTPUT \ CUTCOM_ON \END_IF ;

IF_SET (CUTCOM_OFF) OUTPUT \ CUTCOM_OFF ; END_IF ;

IF_SET (X_CURPOS) OUTPUT \ ; END_IF ; IF_SET (Y_CURPOS) OUTPUT \ ; END_IF ; IF_SET (Z_CURPOS) OUTPUT \ ; END_IF ; IF_SET (MCH_FEED) OUTPUT \ ; END_IF ; IF_SET (MCH_COOL) OUTPUT \ ; END_IF ; SET_ON CIRC_MOV NURBS_MOV; Xold = X_CURPOS ; Yold = Y_CURPOS ; Zold = Z_CURPOS ;

******************************************************** CIRCULAR MOTION: 圆弧运动的输出格式 FlagSpin = NO ;

IF_SET (SPIN_SPEED) FlagSpin = YES ; END_IF ; IF_SET (SPIN_DIR) FlagSpin = YES ; END_IF ; IF_SET (FlagSpin _EQ_ YES) SET_ON SPIN_SPEED SPIN_DIR ;

OUTPUT $ \ END_IF ;

DXcenter = X_CENTER - Xold ; DYcenter = Y_CENTER - Yold ; DZcenter = Z_CENTER - Zold ; OUTPUT $ ;

IF_SET (CIRC_MOV) OUTPUT \ ; END_IF ; IF_SET (X_CURPOS) OUTPUT \ ; END_IF ; IF_SET (Y_CURPOS) OUTPUT \ ; END_IF ; IF_SET (Z_CURPOS) OUTPUT \ ; END_IF ; IF_SET (DXcenter _NE_ 0.0) OUTPUT \ IF_SET (DYcenter _NE_ 0.0) OUTPUT \ IF_SET (DZcenter _NE_ 0.0) OUTPUT \

IF_SET (MCH_FEED) OUTPUT \ IF_SET (MCH_COOL) OUTPUT \ SET_ON LIN_MOV NURBS_MOV ; Xold = X_CURPOS ; Yold = Y_CURPOS ; Zold = Z_CURPOS ;

****************************************************************** NURBS MOTION: START:

OUTPUT $ NURBS_MOV \count = 0; first = 1;

SET_ON MCH_FEED; NURBS MOTION:

IF_SET (first _EQ_ 1)

OUTPUT \KNOT_ \CNTRL_X \CNTRL_Y \CNTRL_Z \MCH_FEED; END_IF;

IF_SET (first _EQ_ 0)

OUTPUT $ \END_IF; first = 0;

NURBS MOTION: END: deg = NURBS_DEG ; REPEAT

count = count + 1 ;

OUTPUT $ \UNTIL (count _EQ_ deg) ;

SET_ON LIN_MOV CIRC_MOV MCH_FEED;

******************************************************** INSERT WITH:

OUTPUT $ INS_STR ;

INSERT WITHOUT:

OUTPUT \\J INS_STR ;

MESSAGE:

OUTPUT $ \ ;

******************************************************** CYCLE: ON: 钻孔循环的输出格式 FlagSpin = NO ;

IF_SET (SPIN_SPEED) FlagSpin = YES ; END_IF ; IF_SET (SPIN_DIR) FlagSpin = YES ; END_IF ; IF_SET (FlagSpin _EQ_ YES) SET_ON SPIN_SPEED SPIN_DIR ;

OUTPUT $ \ END_IF ;

SET_ON X_CURPOS Y_CURPOS Z_CURPOS ;

SET_ON CYC_DEPTH CYC_RETR CYC_CLEAR MCH_COOL ;

SET_ON Zinit Depth Clear ;

Zinit = Z_CURPOS + CYC_DZINIT ; Depth = Z_CURPOS - CYC_DEPTH ; Clear = Z_CURPOS + CYC_CLEAR ; IF_SET (Zold _LT_ Zinit) OUTPUT $ \

MCH_FEED