'Input script to delete &HE: in Fanuc file
' search first 2 lines only

        
if global1<=2 then

    DNCSetting(1,1) ' set strip blank lines on

    s= getIOLine
    
    x=instr(s,"&HE:%") 
    if x=1 then
        global1=9
       ' showmessage(s)
        s="%"
        setIOLine(s)
    end if   

  global1=global1+1
    if global1>2 then
             DNCSetting(1,0) ' set strip blank lines off 
    end if
end if