Siemens SINUMERIK 828D Consignes De Fonctionnement page 363

; Finition du carré
N1510 G1 X10 Y-10
N1520 X-10
N1530 Y10
N1540 X10
N1550 Y-10
N1560
; Désélectionner la frame
N2950 m30 N1580 Z20 G40
N1590 TRANS
N1600
N1610 si $P_BFRAME <> CTRANS(X,10,Y,0,Z,20,CAZ,30,C,15)
N1620 setal(61000)
N1630 endif
N1640 si $P_BFRAME <> $P_CHBFR[0]
N1650 setal(61000)
N1660 endif
N1670 si $P_IFRAME <>
TRANS(X,11,Y,0,Z,2,CAZ,3,C,4):CROT(X,10,Y,20,Z,30):CMIRROR(X,C)
N1680 setal(61000)
N1690 endif
N1730 si $P_ACTFRAME <>
TRANS(X,21,Y,0,Z,22,CAZ,33,C,19):CROT(X,10,Y,20,Z,30):CMIRROR(X,C)
N1740 setal(61001)
N1750 endif
N1760
N1770 TRAFOOF
N1780
N1790 si $P_BFRAME <> CTRANS(X,10,Y,20,Z,30,C,15)
N1800 setal(61000)
N1810 endif
N1820 si $P_BFRAME <> $P_CHBFR[0]
N1830 setal(61000)
N1840 endif
N1850 si $P_IFRAME <>
TRANS(X,11,Y,2,Z,3,C,4):CROT(X,10,Y,20,Z,30):CMIRROR(X,C)
N1860 setal(61000)
N1870 endif
N1880 si $P_IFRAME <> $P_UIFR[1]
N1890 setal(61000)
N1900 endif
N1910 si $P_ACTFRAME <>
TRANS(X,21,Y,22,Z,33,C,19):CROT(X,10,Y,20,Z,30):CMIRROR(X,C)
Fonctions de base
Description fonctionnelle, 01/2023, A5E48764112D AE
Axes, systèmes de coordonnées, frames
4.5 Frames
363