//自定义变量
UserVar j=1 自己的编号
UserVar t=3 偷几个号友(包括自己)
UserVar yanshi=1 当没展开好友栏时把这个延时加大点
dim x(14),y(14)
//FLASH菜地坐标定量数组,支持14个菜地
x(0)=300:y(0)=290
x(1)=200:y(1)=340
x(2)=100:y(2)=390
x(3)=400:y(3)=340
x(4)=300:y(4)=390
x(5)=200:y(5)=440
x(6)=500:y(6)=390
x(7)=400:y(7)=440
x(8)=300:y(8)=490
x(9)=600:y(9)=440
x(10)=500:y(10)=490
x(11)=400:y(11)=540
x(12)=700:y(12)=490
x(13)=600:y(13)=540
Plugin ProcessID=Web.Bind("wqm.exe")
If ProcessID=0
    MessageBox "网页按键精灵没有运行"
    EndScript 
EndIf 
Plugin Web.Tips("脚本开始运行")
Plugin Web.SetSize(1028,744)
Plugin Web.Go("http://happyfarm.xiaoyou.qq.com/")
Plugin Web.ScrollTo(0,0)
Rem <开始>
//展开好友栏
Delay yanshi*1000
Delay 2000
Plugin Web.LeftClick(988,351)
Delay 1000
z=0
a=1
//依次选择好友
For t
    If a=11
        Delay 500
        Plugin Web.LeftClick(964,528)
        z=0
    EndIf 
    Delay 500
    Plugin Web.LeftClick(862,223+z)
    Gosub 采
    z=z+31
    a=a+1
EndFor 
//刷新网页
Plugin Web.KeyPress(116)
Goto <开始>
EndScript 
Sub 采
    b=1
    For 4
        i=0
        //当是自己的农场时点最右边的手,当别人的农场时点偷窃手
        If a=j
            //摘
            If b=1
                Delay 500
                Plugin Web.LeftClick(659,580)
            EndIf 
            //杀虫
            If b=2
                Delay 500
                Plugin Web.LeftClick(609,580)
            EndIf 
            //锄草
            If b=3
                Delay 500
                Plugin Web.LeftClick(559,580)
            EndIf 
            //浇水
            If b=4
                Delay 500
                Plugin Web.LeftClick(509,580)
            EndIf 
        Else 
            //偷
            If b=1
                Delay 500
                Plugin Web.LeftClick(559,580)
            EndIf 
            //杀虫
            If b=2
                Delay 500
                Plugin Web.LeftClick(509,580)
            EndIf 
            //锄草
            If b=3
                Delay 500
                Plugin Web.LeftClick(459,580)
            EndIf 
            //浇水
            If b=4
                Delay 500
                Plugin Web.LeftClick(409,580)