后处理如何自定义变量(已解决)

desk121

( r: _9 M7 A3 Z3 x
( O+ g& v& v# \! r# R; M8 ]8 k. c已解决
/ p# j2 F6 R: O/ l5 m3 M今天发了一下午做siemens840Dshopmill自动换刀镭射对刀的后处理，终于搞定。有一个问题向高手请教：如何自定义变量pcb_mom........
这个tcl语言该怎么给格式？
我要在每个钻循环的前面加G291，如何自定义一个G291。我现在采用的是自定义一个"text"，但不灵活。不能改变模态状态。现在的是这样的：
;(PART NAME: E:\ug\my_Part\20100904-1.prt)
. m/ U0 F  A- G1 y;(PROGRAM NAME: XIAO07)
;(DATE: Sun Nov 28 16:54:08 2010; Author: UGtip_ZX)
) w% {* X. r! F4 MFFWON
0 l9 n# {, v9 _% WHSCA(0.006)
. O& I: u' e% U+ P7 Q2 HG642
$ u% B( G8 M2 EG54 G17 G00 G40 G90
+ N* B+ }2 w2 e1 h9 v. ?* O;(ToolName=Z10)
;(D=10.00  R=0.00   L=50.00)
$ A' V' y+ I! ?T00 M06
7 m  H1 J8 t: X8 c* d- w3 cD1
5 d4 h8 i) T  B+ @S1200 M03
7 T" S3 \  p# f0 F- X( Y: i4 Y( |M65(1,0)
" z1 W: v5 f( P" `0 TG00 X88.4 Y69.68 S1200 M03
4 x& p, j' |1 n+ ]7 H6 s( IZ10.
& U) Y3 m% V) B2 B  zG291
G98 G83 X88.4 Y69.68 Z-10. R3. Q2. F80.
; c) `) h% I! ?) o$ Z- R6 m* QG291
0 y) O* w# \8 u8 I5 N3 mY-69.68
G291
X-88.4
G291
; l. I0 A; t4 p7 ?- z! C# v1 k7 AY69.68
& z  t! u, |( V. F6 ~8 q" CG80
G290
G00 Z10.
" q* N6 \4 Q! y: p& K; L/ SS450 M3
9 l2 o  J! ]5 k9 ^# l: r" t3 xM05
  J$ B6 N8 o* u  S; t- E4 h1 FSUPA G90 G0 D0 Z0
  y  z. P' U: a/ O" n, lM30
" b: W) [+ ~  g1 I6 R;(Total machine time: 0.91 Min.)
/ @2 [; J$ ^% nXIAO07  Z10  中  0.00   0.0    1
现在的情况是每个点位前都输出G291。请教高人指点。

五两三

用“添加文字”--“新地址”的方式添加，则可以设置为模态指令。
: D  [1 m( P! I8 w/ [注意格式选新建一种，以免影响其他指令的模态方式。