Siemens SINUMERIK 840D sl Programming Manual page 804

User stock removal programs
15.2 Generate contour table (CONTPRON)
NC program:
Program code
N10 DEF REAL KTAB[30,11]
N20 DEF INT ANZHINT
N30 DEF INT ERROR
N40 G18
N50 CONTPRON(KTAB,"G",ANZHINT)
N60 G1 X150 Z20
N70 X110 Z30
N80 X50 RND=15
N90 Z70
N100 X40 Z85
N110 X30 Z90
N120 X0
N130 EXECUTE(ERROR)
N140 ...
Contour table KTAB:
Index
Line
(0)
7
0
1
2
3
4
5
6
0
0
804
Column
(1) (2) (3)
7 11 0
2 11 20
3 11 30
4 13 30
5 11 45
6 11 70
7 11 85
0 11 90
0 0 0
0 0 0
Comments
; Contour table with the KTAB name and
max. 30 contour elements, parameter
value 11 (number of table columns) is a
fixed quantity.
; Variable for the number of relief cut
elements with the name ANZHINT.
; Variable for fault feedback signal
(0=no fault, 1=fault).
; Activate contour preparation.
; N60 to N120: Contour description
; End filling the contour table, change
over to normal program operation.
; Continue to process the table.
(4) (5) (6)
0 20 150
150 30 110
110 30 65
65 45 50
50 70 50
50 85 40
40 90 30
30 90 0
0 0 0
0 0 0
Programming Manual, 06/2009, 6FC5398-2BP20-0BA0
(7) (8)
0 82.40535663
-1111 104.0362435
0 90
0 180
0 0
0 146.3099325
0 116.5650512
0 90
0 0
0 0
(9) (10)
0 0
0 0
0 0
45 65
0 0
0 0
0 0
0 0
0 0
0 0
Job Planning