December 2001 Application of OEM Cycles 9 – 9
Example:
HEIDENHAIN
Standard Cycle 201
REAMING
The new HEIDENHAIN standard cycles (beginning with Cycle 200) are written
like OEM cycles.
HEIDENHAIN conversational program Comment
0 BEGIN PGM 201 MM P1 FN 17: SYSWRITE ID212 = +3 Automatic compensation in the tool axis
2 FN 9: IF +Q110 EQU +0 GOTO LBL 199
3 FN 9: IF +Q110 EQU +1 GOTO LBL 199 Inquiry whether spindle on with M3 or M4
4 FN 14: ERROR = 1000 Error message, spindle
5 LBL 199
6 FN 10: IF +Q109 NE –1 GOTO LBL198 Inquiry whether tool is active
7 FN 14: ERROR = 1001 Error message, tool axis is missing
8 LBL 198
9 FN 12: IF +Q201 LE +0 GOTO LBL 197 Inquiry whether machining direction is
negative
10 FN 0: Q30 = -1 If not, set the constant to negative
11 FN 9: IF +0 EQU +0 GOTO LBL 194
12 LBL 197
13 FN 0: Q30 = +1 Otherwise, set the constant to positive
14 LBL 194
15 FN 9: IF +Q97 EQU +1 GOTO LBL 193 Inquiry whether signs were already negated
16 CALL LBL 4
17 LBL 193
18 FN 1: Q19 = +Q203 + +Q200 Calculate Z end position
19 FN 9: IF +Q204 EQU +0 GOTO LBL 2 Inquiry whether 2nd safety clearance was
entered
20 FN 1: Q19 = +Q203 + +Q204 If so, set a new Z end position
21 LBL 2
22 FN 1: Q20 = +Q203 + +Q200 Calculate Z preparatory position
23 FN 1: Q24 = +Q203 + +Q201 Calculate total hole depth
24 FN 0: Q25 = +Q208 Transfer the feed rate for retraction
25 FN 10: IF +Q208 NE +0 GOTO LBL 4 Inquiry whether feed rate for retraction was
entered
26 FN 0: Q25 = +Q206 No: Feed rate for retraction = feed rate for
reaming
27 LBL 4 Negate sign-critical parameters
28 FN 9: IF +Q97 EQU +1 GOTO LBL 192 If sign was already reversed in the DEF
cycle, skip negation