Siemens Sinumerik 802D sl Programming Manual page 146

Enhanced Level Commands
4.5 Macroprograms
Examples
Main program containing the macro call:
_N_M10_MPF:
N10 M3 S1000 F1000
N20 X100 Y50 Z33
N30 G65 P10 F55 X150 Y100 S2000
N40 X50
N50 ....
N200 M30
Macro program in Siemens mode:
_N_0010_SPF:
PROC 0010 ; Switching into Siemens mode
N10 DEF REAL X_AXIS ,Y_AXIS, S_SPEED, FEED
N15 X_AXIS = $C_X Y_AXIS = $C_Y S_SPEED = $C_S FEED = $C_F
N20 G01 F=FEED G95 S=S_SPEED
...
N80 M17
Macro program in ISO mode:
_N_0010_SPF:
N10 G290 ; Switching into Siemens mode,
N20 G01 F=$C_F G95 S=$C_S
N30 G1 X=$C_X Y=$C_Y
N40 G291 ; Switching into ISO mode
N50 M3 G54 T1
N60
...
N80 M99
4-146
; if transfer parameters need to be read
SINUMERIK 802D sl/840D sl840D/840Di sl/840Di/810D ISO Turning -- 04.07 Edition
© SIEMENS AG 2007 All rights reserved
04.07