0  BEGIN PGM 4230_EN MM 
1  ;NC program for machining a screw conveyor.
2  ;The form with its undercuts requires 
3  ;an inclined tool during machining.
4  ;The TCPM function was used in order 
5  ;to permit compensation movements of one 
6  ;of the rotary axes when milling the radii.
7  ;Machining is divided into three steps: 
8  ;roughing, prefinishing and finishing.
9  ;In this main program you define 
10 ;all required parameters and tools.
11 ;First you define some general parameters.
12 ;Then you define the tool 
13 ;and same parameters for each working step.
14 ;After definition, a further NC program is called.
15 ;In this program, the control calculates 
16 ;all further required data and machines the object.
17 ;The contour of the object in the X/Y plane 
18 ;is also contained in the called program.
19 ;Important! 
20 ;A ball-nose cutter must be used for machining.
21 ;It must also be insured that this program 
22 ;has been created for a machine 
23 ;with kinematics including a B head and C table.
24 ;
25 BLK FORM 0.1 Z X-35 Y-35 Z-40
26 BLK FORM 0.2  X+35  Y+35  Z+0
27 ;
28 ;Parameter entry
29 FN 0: Q9 =+3 ;STARTING POINT IN THE Z AXIS
30 FN 0: Q1 =-40 ;END POINT IN THE Z AXIS
31 FN 0: Q2 =+45 ;ROTATION OF THE CONTOUR
32 FN 0: Q5 =+25 ;CLEARANCE HEIGHT
33 FN 0: Q6 =+45 ;CLEARANCE RADIUS
34 ;
35 ;Roughing
36 ;
37 ;Tool call for roughing
38 TOOL CALL "BALL_MILL_D10" Z S3000 F1000
39 TOOL CALL  DL-Q108 ;Length compensation toward ball center
40 ;
41 ;Parameters for roughing
42 FN 0: Q3 =-2 ;PLUNGING DEPTH
43 FN 0: Q4 =+90 ;ANGLE OF INCIDENCE IN B AXIS
44 FN 0: Q7 =+5 ;ALLOWANCE
45 CALL PGM 42301_de.h
46 ;
47 ;Tool call for prefinishing
48 TOOL CALL "BALL_MILL_D8" Z S18000 F1000
49 TOOL CALL  DL-Q108 ;Length compensation toward ball center
50 ;
51 ;Parameters for prefinishing
52 FN 0: Q3 =-1 ;PLUNGING DEPTH
53 FN 0: Q4 =+75 ;ANGLE OF INCIDENCE IN B AXIS
54 FN 0: Q7 =+1 ;ALLOWANCE
55 CALL PGM 42301_de.h
56 ;
57 ;Tool call for finishing
58 TOOL CALL "BALL_MILL_D6" Z S20000 F600
59 TOOL CALL  DL-Q108 ;Length compensation toward ball center
60 ;
61 ;Parameters for finishing
62 FN 0: Q3 =-0.5 ;PLUNGING DEPTH
63 FN 0: Q4 =+60 ;ANGLE OF INCIDENCE IN B AXIS
64 FN 0: Q7 =+0 ;ALLOWANCE
65 CALL PGM 42301_de.h
66 ;
67 ;End of program
68 M30
69 END PGM 4230_EN MM