Siemens SINUMERIK 828D Programming Manual page 229

3.3 Checking for protection zone violation, working area limitation and software limits (CALCPOSI)
Program code
N10 def real _STARTPOS[3]
N20 def real _MOVDIST[3]
N30 def real _DLIMIT[5]
N40 def real _MAXDIST[3]
N50 def int _SB
N60 def int _STATUS
N70 cprotdef(2, true, 0)
N80 g17 g1 x–y0
N90 g3 i2 x2
N100 i–x–
N110 execute(_SB)
N120 cprotdef(4, false, 0)
N130 g17 g1 x0 y15
N140 x10
N150 y25
N160 x0
N170 y15
N180 execute(_SB)
N190 nprotdef(3, false, 0)
N200 g17 g1 x10 y5
N210 x25
N220 y15
N230 x10
N240 y5
N250 execute(_SB)
N260 cprot(2,2,0, 0, 0)
N270 cprot(4,1,0, 0, 0)
N280 nprot(3,2,0, 0, 0)
N290 g25 XX=–YY=–
N300 g26 xx= 20 yy= 21
N310 _STARTPOS[0] = 0.
N320 _STARTPOS[1] = 0.
N330 _STARTPOS[2] = 0.
N340 _MOVDIST[0] = 35.
N350 _MOVDIST[1] = 20.
N360 _MOVDIST[2] = 0.
N370 _DLIMIT[0] = 0.
N380 _DLIMIT[1] = 0.
N390 _DLIMIT[2] = 0.
N400 _DLIMIT[3] = 0.
N410 _DLIMIT[4] = 0.
Job planning
Programming Manual, 07/2010, 6FC5398-2BP40-0BA0
Comments
; Toolrelated protection zone
; Workpiece-related protection zone
; Machine-related protection zone
; Activate or pre-activate
protection zones
; Define working area limit groups
Protection zones
229