str="javascript:document.oncontextmenu = '';document.onmousedown = '';document.ondragstart = ''; document.onselectstart = '';document.onselect = ''; document.oncopy = '';document.onbeforecopy = ''; document.onmousemove = ''; void 0"
VBSCall RunApp("C:\Program Files\Internet Explorer\IEXPLORE.EXE")
Delay 2000
VBSCall FindPic(0,0,1439,899,"地址栏标志点.bmp",0.9,x,y)
If x>0
    x=x-40
    y=y+6
    MoveTo x,y
    Delay 2000
    LeftClick 1
    Delay 1000
    KeyDown 17,1
    KeyPress 86,1
    KeyUp 17,1
    Delay 1000
    KeyPress 13,1
    Delay 1000
    MessageBox("等到网址完全打开以后，点击确定，并且不要移动你的浏览器位置！！")
    Delay 1000
    MoveTo x,y
    Delay 1000
    LeftClick 1
    Delay 1000
    SayString str
    Delay 1000
    KeyPress 13,1
    Delay 1000
    MessageBox("破解完成，您可以正常操作网页了！！")
EndIf