举例:用FreeTurn刀具车削

在以下NC数控程序中使用循环882 SIMULTANEOUS ROUGHING FOR TURNING和循环883 TURNING SIMULTANEOUS FINISHING

程序执行顺序:

  • 激活车削模式
  • 调用带第二切削刃的FreeTurn刀具
  • 用循环800 ADJUST XZ SYSTEM调整坐标系
  • 移至安全位置
  • 调用循环882 SIMULTANEOUS ROUGHING FOR TURNING
  • 调用带第二切削刃的FreeTurn刀具
  • 移至安全位置
  • 调用循环882 SIMULTANEOUS ROUGHING FOR TURNING
  • 移至安全位置
  • 调用循环883 TURNING SIMULTANEOUS FINISHING
  • 用数控程序RESET.h重置当前变换

0 BEGIN PGM FREETURN MM

1 FUNCTION MODE TURN "AC_TURN"

; 激活车削模式

2 PRESET SELECT #16

3 BLK FORM CYLINDER Z D100 L101 DIST+1

4 FUNCTION TURNDATA BLANK LBL 1

; 激活工件毛坯更新

5 TOOL CALL 145.0

; 调用FreeTurn刀具第一切削刃

6 M136

7 FUNCTION TURNDATA SPIN VCONST:ON VC:250

; 恒切削速度

8 L Z+50 R0 FMAX M303

9 CYCL DEF 800 ADJUST XZ SYSTEM ~

Q497=+0

;PRECESSION ANGLE ~

Q498=+0

;REVERSE TOOL ~

Q530=+2

;INCLINED MACHINING ~

Q531=+90

;ANGLE OF INCIDENCE ~

Q532= MAX

;FEED RATE ~

Q533=-1

;PREFERRED DIRECTION ~

Q535=+3

;ECCENTRIC TURNING ~

Q536=+0

;ECCENTRIC W/O STOP ~

Q599=+0

;RETRACT

10 CYCL DEF 14.0 CONTOUR GEOMETRY

11 CYCL DEF 14.1 KONTURLABEL2

12 CYCL DEF 882 SIMULTANEOUS ROUGHING FOR TURNING ~

Q460=+2

;SAFETY CLEARANCE ~

Q499=+0

;REVERSE CONTOUR ~

Q558=+0

;EXT:ANGLE CONT.START ~

Q559=+90

;CONTOUR END EXT ANGL ~

Q478=+0.3

;ROUGHING FEED RATE ~

Q488=+0.3

;PLUNGING FEED RATE ~

Q556=+30

;MIN.INCLINAT.ANGLE ~

Q557=+160

;MAX.INCLINAT.ANGLE ~

Q567=+0.3

;FINISH.ALLOW.CONT. ~

Q519=+2

;INFEED ~

Q463=+2

;MAX. CUTTING DEPTH ~

Q590=+5

;MACHINING MODE ~

Q591=+1

;MACHINING SEQUENCE ~

Q389=+0

;UNI.- BIDIRECTIONAL

13 L X+105 Y+0 R0 FMAX

14 L Z+2 R0 FMAX M99

15 TOOL CALL 145.1

;调用FreeTurn刀具第二切削刃

16 CYCL DEF 800 ADJUST XZ SYSTEM ~

Q497=+0

;PRECESSION ANGLE ~

Q498=+0

;REVERSE TOOL ~

Q530=+2

;INCLINED MACHINING ~

Q531=+90

;ANGLE OF INCIDENCE ~

Q532= MAX

;FEED RATE ~

Q533=-1

;PREFERRED DIRECTION ~

Q535=+3

;ECCENTRIC TURNING ~

Q536=+0

;ECCENTRIC W/O STOP ~

Q599=+0

;RETRACT

17 Q519 = 1

; 将进刀量减少到1

18 L X+105 Y+0 R0 FMAX

; 接近起点

19 L Z+2 R0 FMAX M99

; 调用循环

20 CYCL DEF 883 TURNING SIMULTANEOUS FINISHING ~

Q460=+2

;SAFETY CLEARANCE ~

Q499=+0

;REVERSE CONTOUR ~

Q558=+0

;EXT:ANGLE CONT.START ~

Q559=+90

;CONTOUR END EXT ANGL ~

Q505=+0.2

;FINISHING FEED RATE ~

Q556=+30

;MIN.INCLINAT.ANGLE ~

Q557=+160

;MAX.INCLINAT.ANGLE ~

Q555=+5

;STEPPING ANGLE ~

Q537=+0

;INCID.ANGLE ACTIVE ~

Q538=+90

;INCLIN.ANGLE START ~

Q539=+0

;INCLINATN.ANGLE END ~

Q565=+0

;FINISHING ALLOW.D. ~

Q566=+0

;FINISHING ALLOW.Z ~

Q567=+0

;FINISH.ALLOW.CONT.

21 L X+105 Y+0 R0 FMAX

; 接近起点

22 L Z+2 R0 FMAX M99

; 调用循环

23 CALL PGM RESET.H

; 调用RESET(重置)程序

24 M30

; 程序结束

25 LBL 1

; 定义LBL 1

26 L X+100 Z+1

27 L X+0

28 L Z-60

29 L X+100

30 L Z+1

31 LBL 0

32 LBL 2

; 定义LBL 2

33 L Z+1 X+60 RR

34 L Z+0

35 L Z-2 X+70

36 RND R2

37 L X+80

38 RND R2

39 L Z+0 X+98

40 RND R2

41 L Z-10

42 RND R2

43 L Z-8 X+89

44 RND R2

45 L Z-15 X+60

46 RND R2

47 L Z-55

48 RND R2

49 L Z-50 X+98

50 RND R2

51 L Z-60

52 LBL 0

53 END PGM FREETURN MM