刀补"H1"的修改问题

刀补"H1"的修改问题:
这个后处基本上已经修改得差不多了,唯独不能把这个后处出来的NC程序的刀补,全部改变成"H1"
注:谢绝用其它的后处来代替这一问题的根本,采取针对性的解决问题,才是真正意义上解决了此问题问题!(一家之言)
修改要求:
1:一定要"H1"
2:不能把"H1"改变成"H0"或无刀补(无"H"代码!
3:只针对用下面的附件"宝元后处"文件来作修改!

关键提示:
本人觉得问题的关键在:
define block move rapid
    if ( swa)
      TPN ToolPathName ; " )"
      unset swa
    end if
    N   ; S   ;   M1
    N   ; G1  ; X   ; Y   
    N   ; G6  ; Z   ; H  ; M2  -------此代码为关键