请教高手：帮仿真一下这个程序

猛禽

hermle_c800u的机床，海德汉530控制系统，1号刀是直径16的立铣刀。随便定义一个方块工件模型吧，编程零点在工件上表面。保密原因，只能截取一段程序了，主要看看什么软件能支持我们的编程方法。机床自带仿真结果是正确的。

0  BEGIN PGM 9999 MM
1  BLK FORM 0.1 Z  X-100  Y-100  Z-100
2  BLK FORM 0.2  X+100  Y+100  Z+0
3  TOOL CALL 1 Z S2000
4  L  A+0  C+0 R0 FMAX
5  L  X+0  Y+0 R0 FMAX
6  L  Z+2 R0 FMAX M13
7  CYCL DEF 5.0 CIRCULAR POCKET
8  CYCL DEF 5.1 SET UP2
9  CYCL DEF 5.2 DEPTH-10
CYCL DEF 5.3 PLNGNG1 F1000
11 CYCL DEF 5.4 RADIUS25
12 CYCL DEF 5.5 F200 DR+
13 CYCL CALL
14 L  Z+250 R0 FMAX M9
15 L  C+0  A-90 R0 FMAX  
16 CYCL DEF 19.0 WORKING PLANE
17 CYCL DEF 19.1  C+0  A-90  FMAX
18 CYCL DEF 7.0 DATUM SHIFT
19 CYCL DEF 7.1  Y+50
20 CYCL DEF 7.2  Z+50
21 L  Z+100 R0 FMAX
22 L  X+0  Y+0 R0 FMAX
23 CYCL DEF 252 CIRCULAR POCKET ~
    Q215=+1    ;MACHINING OPERATION ~
    Q223=+50   ;CIRCLE DIAMETER ~
    Q368=+0    ;ALLOWANCE FOR SIDE ~
    Q207=+500  ;FEED RATE FOR MILLNG ~
    Q351=+1    ;CLIMB OR UP-CUT ~
    Q201=-10   ;DEPTH ~
    Q202=+1    ;PLUNGING DEPTH ~
    Q369=+0    ;ALLOWANCE FOR FLOOR ~
    Q206=+150  ;FEED RATE FOR PLNGNG ~
    Q338=+0    ;INFEED FOR FINISHING ~
    Q200=+2    ;SET-UP CLEARANCE ~
    Q203=+0    ;SURFACE COORDINATE ~
    Q204=+50   ;2ND SET-UP CLEARANCE ~
    Q370=+1    ;TOOL PATH OVERLAP ~
    Q366=+1    ;PLUNGE ~
    Q385=+500  ;FINISHING FEED RATE
;24 CYCL CALL M13
25 L  Z+250 R0 FMAX M9
26 LBL 1
27 CYCL DEF 7.0 DATUM SHIFT
28 CYCL DEF 7.1  X+0
29 CYCL DEF 7.2  Y+0
30 CYCL DEF 7.3  Z-0
31 CYCL DEF 19.0 WORKING PLANE
32 CYCL DEF 19.1  A-0  C+0
33 LBL 0
34 L  C+90  A-90 R0 FMAX
35 CYCL DEF 19.0 WORKING PLANE
36 CYCL DEF 19.1  C+90  A-90
37 CYCL DEF 7.0 DATUM SHIFT
38 CYCL DEF 7.1  Y+50
39 CYCL DEF 7.2  Z+50
40 L  Z+100 R0 FMAX
41 L  X+0  Y+0 R0 FMAX
42 CYCL DEF 208 BORE MILLING ~
    Q200=+2    ;SET-UP CLEARANCE ~
    Q201=-2   ;DEPTH ~
    Q206=+150  ;FEED RATE FOR PLNGNG ~
    Q334=+0.25 ;PLUNGING DEPTH ~
    Q203=+0    ;SURFACE COORDINATE ~
    Q204=+50   ;2ND SET-UP CLEARANCE ~
    Q335=+50   ;NOMINAL DIAMETER ~
    Q342=+40   ;ROUGHING DIAMETER ~
    Q351=+1    ;CLIMB OR UP-CUT
43 CYCL CALL M13
44 L  Z+250 R0 FMAX M9
45 CALL LBL 1
46 L  C+180  A-90 R0 FMAX
;47 CYCL DEF 19.0 WORKING PLANE
;48 CYCL DEF 19.1  C+180  A-90
49 CYCL DEF 7.0 DATUM SHIFT
50 CYCL DEF 7.1  Y+50
51 CYCL DEF 7.2  Z+50
52 L  Z+100 R0 FMAX
53 L  X+0  Y+0 R0 FMAX
54 L  Z+2 R0 FMAX M13
55 L  Z-10 R0 F100
56 FN 0: Q1 =+25
57 FN 0: Q2 =+25
58 FN 0: Q3 =+0
59 FN 0: Q4 =+360
60 FN 0: Q5 =+720
61 FN 4: Q6 =+Q4 DIV +Q5
62 LBL 2
63 FN 6: Q7 = SIN +Q3
64 FN 7: Q8 = COS +Q3
65 FN 3: Q9 =+Q1 * +Q8
66 FN 3: Q10 =+Q2 * +Q7
67 L  X+Q9  Y+Q10 F200
68 FN 1: Q3 =+Q3 + +Q6
69 FN 9: IF +Q3 EQU +Q4 GOTO LBL 2
70 FN 12: IF +Q3 LT +Q4 GOTO LBL 2
71 L  Z+250 R0 FMAX M9
72 CALL LBL 1
73 L  C+270  A-90 R0 FMAX
;74 CYCL DEF 19.0 WORKING PLANE
;75 CYCL DEF 19.1  C+270  A-90
76 CYCL DEF 7.0 DATUM SHIFT
77 CYCL DEF 7.1  Y+50
78 CYCL DEF 7.2  Z+50
79 L  Z+100 R0 FMAX
80 L  X+0  Y+0 R0 FMAX
81 L  Z+2 R0 FMAX M13
82 L  Z-10 R0 F100
83 FN 0: Q1 =+40
84 FN 0: Q2 =+20
85 FN 0: Q3 =+0
86 FN 0: Q4 =+360
87 FN 0: Q5 =+720
88 FN 4: Q6 =+Q4 DIV +Q5
89 LBL 3
90 FN 6: Q7 = SIN +Q3
91 FN 7: Q8 = COS +Q3
92 FN 3: Q9 =+Q1 * +Q8
93 FN 3: Q10 =+Q2 * +Q7
94 L  X+Q9  Y+Q10 F200
95 FN 1: Q3 =+Q3 + +Q6
96 FN 9: IF +Q3 EQU +Q4 GOTO LBL 3
97 FN 12: IF +Q3 LT +Q4 GOTO LBL 3
98 L  Z+250 R0 FMAX M9
99 CALL LBL 1
100 TOOL CALL 0 Z S1000
101 L  A+0  C+0 R0 FMAX M2
102 END PGM 9999 MM

duoshiren

duoshiren

猛禽

猛禽

猛禽

dglizhma

blackholeljg

cfbuaa

blackholeljg