- 展开附件 .\plugin *.dll
- 延时1000毫秒
- 用户定义变量 Var1=DropList{祖鲁平原(三区):1|龙骨荒原(二区):2|徳沃山谷(一区):3}=0 登陆服务器
- 用户定义变量 Var2=0 登录邮箱
- 用户定义变量 Var3=0 登录密码
- //<>=======================================打开网页
- //Plugin Web.Bind()
- 调用插件命令 Web.Bind("wqm.exe")
- 调用插件命令 Web.Tips("打开选择服务器网页")
- 调用插件命令 Web.Go("http://www.yerenji.com/servers.html")
- 调用插件命令 Web.SetSize(900,800)
- 延时1000毫秒
- 延时1000毫秒
- 如果表达式 (Var1="1") 为真,则
- 调用插件命令 Web.HtmlClick("tag:A&txt:祖鲁平原(三区)")
- 否则如果(Var1="2")为真,则
- 调用插件命令 Web.HtmlClick("tag:A&txt:龙骨荒原(二区)")
- 否则如果(Var1="3")为真,则
- 调用插件命令 Web.HtmlClick("tag:A&txt:徳沃山谷(一区)")
- 条件结束
- 延时1000毫秒
- 延时1000毫秒
- 调用插件命令 Web.Tips("玩家登陆帐号密码填写...")
- 调用插件命令 Web.HtmlInput(Var2,"id:email")
- 调用插件命令 Web.HtmlInput(Var3,"id:password")
- //<>=============识别验证码(必须保证能看见验证码在最前面,否则无法识别!)
- 调用插件命令 Web.Tips("验证码识别...")
- //下面这句是得到当前最前面的窗口句柄
- 调用插件命令 Hwnd = Window.Foreground()
- //下面这句是得到窗口句柄的客户区大小
- 调用插件命令 Rect = Window.GetClientRect(Hwnd)
- MyArray = Split(Rect, "|")
- L = Clng(MyArray(0))+509: T = Clng(MyArray(1))+631
- 调用插件命令 yzm=uuplay.GetOCR(L,T)
- 如果表达式 (yzm="") 为真,则
- 弹出窗口 "识别验证码(必须保证能看见验证码和WQM在最前面,否则无法识别!)"
- 脚本停止运行
- 条件结束
- 调用插件命令 Web.HtmlInput(yzm,"id:validcode")
- 延时1000毫秒
- //登陆
- 调用插件命令 Web.Tips("登陆...")
- 调用插件命令 Web.LeftClick(440,615)
- 脚本停止运行
- 子程序 OnScriptExit
- 调用插件命令 Web.Tips("脚本停止运行...")
- 弹出窗口 "演示填表完成,最好的脚本都是自己做的!"
- 子程序结束,回到调用处