Examples; Preprocessing Individual Files - Siemens SINUMERIK 840D sl Function Manual

The axes to be traversed are addressed indirectly via machine data or transferred as
parameters:
● Indirect axis programming:
– IF $AA_IM[AXNAME($MC_AXCONF_CHANAX_NAME_TAB[4])] > 5
– G1 AX[AXNAME($MC-AXCONF-GEOAX-NAME-TAB[0])] = 10
● Transfer of axis to be traversed from the main program:
– Cycle definition
– Call from the main program
22.5

Examples

22.5.1

Preprocessing individual files

Program code
PROC UP1 PREPRO
N1000 DEF INT COUNTER
N1010 TARGET: G1 G91 COMPON
N1020 G1 X0.001 Y0.001 Z0.001 F100000
N1030 COUNTER=COUNTER+1
N1040 COUNTER=COUNTER-1
N1050 COUNTER=COUNTER+1
N1060 IF COUNTER<=10 GOTOB TARGET
N1070 M30
Special functions
Function Manual, 01/2015, 6FC5397-2BP40-5BA2
; This branch will pass through if the actual value of the 5th channel axis
; with reference to the machine coordinate system is greater than 5.
F1000 G90.
; Traverse the 1st geometry axis to the value 10.
ENDIF
PROC DRILL(AXIS DRILL_AXIS)
WHILE $AA_IW[DRILL_AXIS] > -10
G1 G91 F250 AX[DRILL_AXIS] = -1
ENDWHILE
DRILL(Z)
Comment
; Preprocessing if bit 5 = 1
; in PREPROCESSING_LEVEL
V2: Preprocessing
22.5 Examples
767