求高手帮忙更改#的宏程序，麻烦了，谢谢！！

求高手帮忙更改#的宏程序，麻烦了，谢谢！！
原输出程序为：
%
( JUL -01 -16 -21:21 )
(NO NAME_T1 -H1 -D1 -D10.)
(NO NAME_T2 -H2 -D2 -D5. )
(OVERALL MAX  Z50.)
(OVERALL MIN  Z0.)
G0 G17 G40 G49 G80 G90
G91 G28 Z0.
N1 ( T- 1  D- 1  L- 1  DIA= 10. R0. )
T1 M06
T2
#100=1
G0 G54 G90 X-37.5 Y-10.
G43 H1 Z50. S3819 M3
Z10.
G1 Z0. F763.8
X-27.5 F1527.6
G3 X-17.5 Y0. R10.
G2 X17.5 R17.5
X-17.5 R17.5
G3 X-27.5 Y10. R10.
G1 X-37.5
Z10. F763.8
G0 Z50.
# 100 = # 100+1
IF [ # 100 LE20 ]   GOTO N1
G91 G28 Z0. M05
M01
N2 ( T- 2  D- 2  L- 2  DIA= 5. R0. )
T2 M06
T1
#100=1
G0 G54 G90 X-6.67 Y-.128
G43 H2 Z10. S4583 M3
G99 G81 Z0. R10. F1099.9
X5.323 Y.851
G80
Z10.
# 100 = # 100+1
IF [ # 100 LE20 ]   GOTO N1
M5
G91 G28 Z0.
G28 Y0.
M30
%
需要更改后为：
%
( JUL -01 -16 -21:21 )
(NO NAME_T1 -H1 -D1 -D10.)
(NO NAME_T2 -H2 -D2 -D5. )
(OVERALL MAX  Z50.)
(OVERALL MIN  Z0.)
G0 G17 G40 G49 G80 G90
G91 G28 Z0.
( T- 1  D- 1  L- 1  DIA= 10. R0. )
T1 M06
T2
#100=1
N1 G0 G54.1P[#100] G90 X-37.5 Y-10.
G43 H1 Z50. S3819 M3
Z10.
G1 Z0. F763.8
X-27.5 F1527.6
G3 X-17.5 Y0. R10.
G2 X17.5 R17.5
X-17.5 R17.5
G3 X-27.5 Y10. R10.
G1 X-37.5
Z10. F763.8
G0 Z50.
# 100 = # 100+1
IF [ # 100 LE20 ]   GOTO 1
G91 G28 Z0. M05
M01
( T- 2  D- 2  L- 2  DIA= 5. R0. )
T2 M06
T1
#100=1
N2 G0 G54 G90 X-6.67 Y-.128
G43 H2 Z10. S4583 M3
G98 G81 Z0. R3. F1099.9
X5.323 Y.851
G80
Z10.
# 100 = # 100+1
IF [ # 100 LE20 ]   GOTO 2
M5
G91 G28 Z0.M9
G28 Y0.
M30
%

有没有人吗？帮下忙，上面程序只是举个例子，真实的程序比较长，每次改来改去的很麻烦，，，，

需要更改的地方：
1.只在每次换刀备刀后的下一行出现序号N，其他不需要，
2.调用程序时，GOTO后面跟该刀具号可以一致
3.把G54改成G54.1P[#100]

附件就是我输出上面原来的程序的后处理，麻烦高手区更改，谢谢！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！！

其他都搞定了，但是GOTO后面跟该刀具号可以一致，不知道怎么弄的，

帮顶吧

帮你顶吧，应该挺好改

谢谢了，谢谢了，谢谢了！

我们是做批量加工的，一次做20个，这个是常用的宏，20个坐标方便修改尺寸的

感觉用宏的都好屌！