Siemens SINUMERIK 840D sl Programming Manual page 592

User stock removal programs
14.2 Contour preparation (CONTPRON)
NC parts program
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 ...
Table KTAB
Index
Line
(0)
7
0
1
2
3
4
5
6
0
0
14-4
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
;Contour table named KTAB and, for example,
;a maximum of 30 contour elements
;parameter value 11 is a fixed quantity
;Variable for number of relief cut elements
;with name ANZHINT
;Variable for acknowledgment
;0 = no error, 1 = error
;Contour preparation call
;N60 to N120 contour description
;Terminate filling of contour table,
;switch to normal program execution
;Continue processing 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, 03/2006 Edition, 6FC5398-2BP10-1BA0
(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