1. 用户定义变量 Var1 = "http://www.3663.com/playgame/index/4/53/1?iframe=1" "游戏地址"
  2. 用户定义变量 Var2 = "http://www.3663.com/member/login/?referer=" "登录地址"
  3. 用户定义变量 Var3 = "http://www.3663.com/member/logout/?referer=" "退出地址"
  4. 注释:--得到wqm窗口句柄,并最大化-----------------------------------------------------------------
  5. 函数 Hwnd()
  6.     (语句无法识别,可能有错误): HwndEx = Plugin.Window.SearchEx("Afx:00400000",0,0)//查找wqm浏览器
  7.     如果 HwndEx = "" 则
  8.         调用 Web.Tips("正在打开浏览器...")
  9.         (语句无法识别,可能有错误): Call Plugin.Web.Bind("wqm.exe")//调用wqm浏览器
  10.         调用 Window.Max(Window.Foreground())
  11.         令 Hwnd = Window.Foreground()
  12.         延时 2000 毫秒
  13.     否则
  14.         (语句无法识别,可能有错误): MyArray = Split(HwndEx, "|")//数组化
  15.         令 Hwnd = MyArray(0)
  16.         调用 Window.Max(MyArray(0))
  17.     条件结束
  18. 函数结束
  19. 调用 Hwnd()
  20. 子程序 login(name,pass)
  21.     Web.Go(Var3 & Var1)
  22.     延时 2000 毫秒
  23.     调用 Web.HtmlInput(name,"name:login[user_code]")
  24.     调用 Web.HtmlInput(pass,"name:login[user_password]")
  25.     令 arr_xy = split(Web.HtmlGet("offset","tag:INPUT&value:登录"),"|")
  26.     (鼠标)移动到 (arr_xy(0) + 50, arr_xy(1) + 140)
  27.     (鼠标)左键单击, 1次
  28. 子程序结束
  29. 调用 login("eksij","eksij1997")
  30. 注释:-------------------------------------------------------------------
  31. 标记 准备登录
  32. 令 a = (键盘)等待按任意键
  33. 如果 a = 27 则
  34.     跳转到标记 退出
  35. 否则如果 a = 48 则
  36.     调用 Web.TabNew()
  37.     调用 login("eksij","eksij1997")
  38. 否则如果 a > 48 并且 a < 58 则
  39.     调用 Web.TabNew()
  40.     调用 login("eksij0" & (a - 48),"eksij0" & (a - 48))
  41. 条件结束
  42. 跳转到标记 准备登录
  43. 标记 退出
  44. 注释:-------------------------------------------------------------------
  45. 注释:-------------------------------------------------------------------
  46. 注释:-------------------------------------------------------------------
  47. 注释:-------------------------------------------------------------------