[General]
Description=WQM-一键注册QQ帐号
BeginHotkey=121
BeginHotkeyMod=0
PauseHotkey=0
PauseHotkeyMod=0
StopHotkey=123
StopHotkeyMod=0
RunOnce=1
EnableWindow=
Enable=0
AutoRun=0
[Repeat]
Type=0
Number=1
[Relative]
SetupOCXFile=
[Comment]
Content=【功能说明】
一键注册QQ帐号
【使用说明】
验证码输入需要手动输入,再按回车键后即可完成注册
【作者介绍】
兄弟工程师01
【制作日期】
2009.6.24

[Script]
Delay 1000
Plugin Web.Bind("wqm.exe")
//<>===================================================打开网页免费申请
Plugin Web.Tips("打开网页免费申请网页")
Plugin Web.Go("http://newreg.qq.com/")
Plugin Web.SetSize(913,850)
Delay 1000
//<>===================================================输入名字
Plugin Web.HtmlInput("name","type:text&index:0")
Plugin Web.Tips("输入生日")
Delay 500
//<>===================================================输入生日-年
Plugin Web.LeftClick(325,200)
Delay 500
For 3
    Plugin Web.KeyPress(40)
EndFor 
Delay 500
//<>===================================================输入生日-月
Plugin Web.LeftClick(425,200)
Delay 500
For 3
    Plugin Web.KeyPress(40)
EndFor 
Delay 500
//<>===================================================输入生日-日
Plugin Web.LeftClick(525,200)
Delay 500
For 3
    Plugin Web.KeyPress(40)
EndFor 
Delay 500
Plugin Web.LeftClick(625,200)
//<>===================================================输入密码
Plugin Web.LeftClick(360,260)
Delay 500
Plugin Web.Tips("输入密码")
Plugin Web.KeyPress(65)
For 6
    Plugin Web.KeyPress(49)
EndFor 
Delay 500
Plugin Web.LeftClick(360,310)
Delay 500
Plugin Web.KeyPress(65)
For 6
    Plugin Web.KeyPress(49)
EndFor 
Delay 500
//<>==================================================输入验证码
Plugin Web.Tips("等待输入验证码,结束按回车键")
Plugin Web.LeftClick(335,373)
Delay 500
Rem 等待
WaitKey key
//<>===================================================按回车键即可提交申请
If key=13
    Goto 离开
EndIf 
Goto 等待
Rem 离开
//<>===================================================确定并同意以下条款
Plugin Web.Tips("注册提交")
//Plugin Web.LeftClick(375,485)
Plugin web.HtmlClick("tag:span&txt:确定并同意以下条款")
Delay 500
EndScript 
Sub OnScriptExit
    Plugin Web.Tips("脚本停止运行")
Return 
