gpp2后处理程序头添加刀具清单列表的源码

wangyao201

在程序结束的时候,判断下一把刀是否和当前刀一样,如果不一样则再次判断.
toolno是我的后处理的刀号变量,用以存储上一把刀的刀号,fgcx变量是f,就是分割程序.

END OF PROC:

  IF(NEXT_PROC_TOOL(TOOL_NUM) _NE_ TOOL_NUM)
*在程序结束的时候,判断下一把刀是否和当前刀一样,不相等则进入到此行
    IF (toolno _EQ_ "s" _OR_ fgcx _NE_ "f" )
*如果是手动换刀或者不分割程序则进入到此行
OUTPUT_REDIRECT "t";
*更改输出定位到另一个文件,文件名是后处理的t结尾,一般文件名是后处理.t01
OUTPUT $ "(T" sybtln " D"sybdzj " R"sybdr"-"sybdc "   N=" sybdm "   ZMIN>> " minz  ")" ;
*输出上一把刀号,上一把刀直径,上一把刀r角,刀具名字,最小z值
OUTPUT_BACK;   
*回归输出到正常后处理程序文件
END_IF;
END_IF;



最后在endoftape段,进行程序合并,这里把他输出到print0里
PRINT0 \j " copy/b "DBL_QUOTE PART_NAME "."TP_NAME "." POST_NAME "._t01" DBL_QUOTE "+" DBL_QUOTE hcllj PART_NAME "."TP_NAME "." POST_NAME DBL_QUOTE " " DBL_QUOTE hcllj PART_NAME "-"TP_NAME"\" PART_NAME "-"TP_NAME"."suffix DBL_QUOTE;


主要是用copy/b a文件+b文件 c文件
这样的bat语法格式
hcllj则是后处理的路径
DBL_QUOTE是"号,用以bat运行很长的文件名.
这个print0再改名成一个print0.bat,再后处理最后syscall一下,运行,就能合并刀具清单到程序头里了.

下面一段是示例

%
O100
(UCS= FST)
(date= 11-20 time 13:49:30  )
(T01 D49.8 R5.-115.   N=50R5   ZMIN>> 69.2)
(T19 D24.75 R0.8-120.   N=W25R0.8-120   ZMIN>> 1.)
(T02 D50.5 R5.-115.   N=F_50R5   ZMIN>> 69.)
(T05 D9.8 R0.8-50.   N=W10R0.8_T01   ZMIN>> 66.)
(time = 01:02:57 )
(TPN= CE1)
G80 G90 G40 G17 G00
N99901
M06 T01
M01
G43 H01 Z134.
(T 01 D 49.8 R5.-115. N= 1_50R5)
(P.OFST= 0.2 )
(COUNT= -18  )
(Z= 0.4 SIDE= 30 )
G00 Z134.
S750 M03
X-299.734 Y27.109
Z134.5

wangyao201

补充一下
toolno是我的后处理的一个变量
s就是手动换刀
d就是斗笠式刀库
h就是刀臂式刀库
b就是手动换刀并且用刀具长度补偿

luckxin798

自己研究出来感觉很舒服的。当初也是这样埋头研究。

zbhouin

一个字“乱”

zbhouin

SET_TABS 8 20 28 ;




OUTPUT \J "( T" TOOL_NUM TAB_ TOOL_NAME TAB_ "D= " DIAMETER_ TAB_ " R= " TOOL_RAD " )";

nanhuali

牛牛牛！！！！

有啊

不错不错....