|
|
马上注册，结识高手，享用更多资源，轻松玩转三维网社区。
您需要 登录 才可以下载或查看，没有帐号？注册
x
最近我想弄个HAAS格式的后处理，就那FANUC的后处理来改造，结果在攻丝环节出了点问题。还请有识之士给予帮助，感激不尽。具体情况如下。2 n' W' _2 i1 p7 a! i2 k$ z
比如攻一个M3*0.5 深15的螺纹孔，如果一次攻到位，很可能断丝，所以我一次攻丝3，5次攻丝到位。需要UG输出关键部分程序如下：
1 {& W$ t6 ?" B0 D ^G98 G84 X0 Y0 Z-3.0 R3.0 F50.0
4 U4 m1 e, }: MG98 G84 X0 Y0 Z-6.0 R3.0 F50.09 |7 c( N; P- S9 `
G98 G84 X0 Y0 Z-9.0 R3.0 F50.0
; e% E/ t% R* O3 N V: xG98 G84 X0 Y0 Z-12.0 R3.0 F50.0* S/ Z# K9 L/ L" G! U1 M) D* ^6 y
G98 G84 X0 Y0 Z-15.0 R3.0 F50.0
8 D" l5 a" k( X4 E
% M/ C2 u' f) a6 p( M8 _为实现这一目标，我在攻丝循环插入如下TCL脚本
4 s+ d1 ]8 r" r: d- g5 ]2 k6 Y2 J- {& r
global mom_cycle_feed_to_pos(0)
$ H J. t- |9 U7 C6 P5 U mom_cycle_feed_to_pos(1)
' j0 m1 }$ `8 Z* w- a mom_cycle_feed_to_pos(2)# g$ V, ]3 A: K3 y/ R& j( ^
mom_cycle_rapid_to_pos($mom_cycle_spindle_axis)
2 s! k# R) M( y- C' ^, m5 F8 T$ V mom_cycle_cam
5 G- s2 o" Y. }2 p3 x& x. A P/ } feed
2 J; r6 K; O) D$ ^3 r* cset x $mom_cycle_feed_to_pos(0). N8 E! w! x. u8 H
set y $mom_cycle_feed_to_pos(1)
8 D1 }1 E+ X2 x, J' u6 vset z $mom_cycle_feed_to_pos(2)1 @$ L) f; E4 n f7 n% t& R
set r $mom_cycle_rapid_to_pos($mom_cycle_spindle_axis)
5 F$ F4 U" f4 z ]set q $mom_cycle_cam
) t3 y# K1 }4 k' Jset f $feed
* d! m. f5 D; V, Fif {$q > 0} {* p4 O1 R6 u' ]; ?* p" I7 e
set i [expr round(($r-$z)/$q)]
: n/ j/ D+ Y6 Y9 Bset j 1
" v5 Q' [. ~! @! v, Swhile {$j <= $i} {3 V, w9 v0 U# v9 K, [4 x1 Q
set z1 [expr $r- $j*$q]
1 O9 P- r1 A# ]5 W+ J6 q* F- q mom_output_literal "G84 X$x Y$yZ$z1 R$r F$f". }8 V; p$ s/ c3 s* B
incr j 1
# u5 S0 K3 q" H/ `$ S, t4 J4 [7 s }
- o! K! U: H( \. \* c X }6 C) p7 N6 c- D# @8 l& g- Z
7 A7 g/ `+ y! C* E3 V% y
结果报错，提示问题在R 参数那里有问题，没有这种变量！这个R参数我看过了，应该是$mom_cycle_rapid_to_pos($mom_cycle_spindle_axis)' @% B# N# w1 B) P; I+ ]/ m, b7 H
呀，怎么就错了呢？请三维网的大师帮帮我，感激不尽！, u2 j3 ]; o w( r
|
|
发表于 2014-3-23 19:40:06
楼主