1. Event(Form1.Button1.Click)
  2. 循环当 true 时
  3.     令 PID = Web.Bind("wqm.exe")
  4.     调用 Web.Go("http://huanle.qq.com/act/a20120521sds/?ADTAG=inhall.act.happy.sds")
  5.     延时 500 毫秒
  6.     调用 Web.ScrollTo(0,391)
  7.     延时 500 毫秒
  8.     调用 Web.MoveTo(817,419)
  9.     延时 500 毫秒
  10.     调用 Web.LeftClick(817,419)
  11.     延时 200 毫秒
  12.     调用 Web.HtmlClick("id:freeChallengeId")
  13.     延时 22000 毫秒
  14. 循环结束
  15. (语句无法识别,可能有错误): End Event