Siemens SINUMERIK 828D Programming Manual

Protection zones
3.3 Checking for protection zone violation, working area limitation and software limits (CALCPOSI)
Job planning
230 Programming Manual, 07/2010, 6FC5398-2BP40-0BA0
Program code
Comments
;Various function calls
N420 _STATUS = calcposi(_STARTPOS,_MOVDIST,
_DLIMIT, _MAXDIST)
N430 _STATUS = calcposi(_STARTPOS,_MOVDIST,
_DLIMIT, _MAXDIST,,3)
N440 _STATUS = calcposi(_STARTPOS,_MOVDIST,
_DLIMIT, _MAXDIST,,1)
; Other starting point
N450 _STARTPOS[0] = 5.
N460 _STARTPOS[1] = 17.
N470 _STARTPOS[2] = 0.
; Other destination
N480 _MOVDIST[0] = 0.
N490 _MOVDIST[1] =–.
N500 _MOVDIST[2] = 0.
;Various function calls
N510 _STATUS = calcposi(_STARTPOS,_MOVDIST,
_DLIMIT, _MAXDIST,,14)
N520 _STATUS = calcposi(_STARTPOS,_MOVDIST,
_DLIMIT, _MAXDIST,, 6)
N530 _DLIMIT[1] = 2.
N540 _STATUS = calcposi(_STARTPOS,_MOVDIST,
_DLIMIT, _MAXDIST,, 6)
N550 _STARTPOS[0] = 27.
N560 _STARTPOS[1] = 17.1
N570 _STARTPOS[2] = 0.
N580 _MOVDIST[0] =–.
N590 _MOVDIST[1] = 0.
N600 _MOVDIST[2] = 0.
N610 _DLIMIT[3] = 2.
N620 _STATUS = calcposi(_STARTPOS,_MOVDIST,
_DLIMIT, _MAXDIST,, 12)
N630 _STARTPOS[0] = 0.
N640 _STARTPOS[1] = 0.
N650 _STARTPOS[2] = 0.
N660 _MOVDIST[0] = 0.
N670 _MOVDIST[1] = 30.
N680 _MOVDIST[2] = 0.
N690 trans x10
N700 arot z45
N710 _STATUS = calcposi(_STARTPOS,_MOVDIST,
_DLIMIT, _MAXDIST)
N720 M30

Siemens SINUMERIK 828D Specifications

General

Control Type	CNC
Operating System	Windows Embedded
Processor	Intel Atom
Display	10.4" color TFT display
Interfaces	Ethernet, USB
Programming	ShopMill, ShopTurn
Operation Panel Size	10.4"
Protection Class	IP65
PLC Memory	2 MB
Spindle Capacity	4 spindles
Hard Drive	CompactFlash