ProcessID=Plugin.Web.Bind("wqm.exe")
Delay 2000
If ProcessID=0 then
  MessageBox "网页按键精灵没有运行"
  EndScript
End If
Call Plugin.Web.SetSize(1024,746)
Call Plugin.Web.Go("http://www.rongame.com/home.php?mod=space&do=rgapp&appid=10002")
Call Plugin.Web.ScrollTo(0,372)
Delay 5000
Call Plugin.Web.LeftClick(802,487)
Delay 4000
Call Plugin.Web.LeftDown(339,129)
Delay 150
Call Plugin.Web.LeftUp(335,131)
Delay 1100
Call Plugin.Web.LeftClick(444,150)
Delay 2700
Call Plugin.Web.LeftClick(764,135)
Delay 3575
Call Plugin.Web.LeftClick(292,303)
Delay 1582
Call Plugin.Web.LeftClick(500,351)
Delay 3235
Call Plugin.Web.LeftClick(361,193)
Delay 1132
Call Plugin.Web.LeftClick(477,187)
Delay 570
Call Plugin.Web.LeftClick(377,287)
Delay 1603
Call Plugin.Web.LeftClick(459,278)
Delay 801
Call Plugin.Web.LeftClick(649,472)
Delay 8101
Call Plugin.Web.LeftClick(465,15)
Delay 6430
Call Plugin.Web.LeftClick(809,491)
Delay 6309
Call Plugin.Web.LeftClick(437,212)
Delay 5157
Call Plugin.Web.LeftClick(342,311)
Delay 982
Call Plugin.Web.LeftClick(501,367)
Delay 2834
Call Plugin.Web.LeftClick(365,195)
Delay 961
Call Plugin.Web.LeftClick(480,177)
Delay 571
Call Plugin.Web.LeftDown(382,274)
Delay 110
Call Plugin.Web.LeftUp(382,275)
Delay 1022
Call Plugin.Web.LeftDown(466,275)
Delay 80
Call Plugin.Web.LeftUp(467,276)
Delay 591
Call Plugin.Web.LeftClick(627,471)
Delay 27439
Call Plugin.Web.LeftDown(781,304)
Delay 130
Call Plugin.Web.LeftUp(781,305)
Sub OnScriptExit()
End Sub