Plugin Bkgnd.LeftClick(hwnd, X, Y)
    Delay 2000
    IfColor mx,my,0004D6,2
        Delay 1000
        Rem 捡取
        If zijiu<zi
            Plugin Bkgnd.KeyPress(hwnd,skill1)
            Plugin Bkgnd.KeyPress(hwnd,skill2)
            Plugin Bkgnd.KeyPress(hwnd,skill3)
            //Delay 1000
            zijiu=zijiu+1
            sha=sha+1
            Plugin Msg.ShowScrTXT(6, 118, 122, 145, "杀怪数"&sha, "0000FF")
        EndIf 
        IfColor mx,my,21204A,2
            Plugin Bkgnd.KeyPress(hwnd,32)
            Plugin Bkgnd.KeyPress(hwnd,32)
            zijiu=0
            Goto 开始
        Else 
            Delay 1000
            If zijiu>=zi
                zijiu=0
                Goto 开始
            EndIf 
            Goto 捡取
            Goto 开始
        EndIf 
    EndIf 
EndIf 
Plugin XY = Bkgnd.FindColorEx(hwnd,maxx,maxy,maxrx,maxry,"4AFF84",0, ck)
//下面这句用于分割字符串
MyArray = Split(XY, "|")
//下面这句将字符串转换成数值
X = CInt(MyArray(0)): Y = CInt(MyArray(1))
If X>-1 and Y>-1
    X=X+20
    Y=Y-30
    Plugin Bkgnd.LeftClick(hwnd, X, Y)
    Delay 2000
    IfColor mx,my,0004D6,2
        Delay 1000
        Rem 捡取
        If zijiu<zi
            Plugin Bkgnd.KeyPress(hwnd,skill1)
            Plugin Bkgnd.KeyPress(hwnd,skill2)
            Plugin Bkgnd.KeyPress(hwnd,skill3)
            //Delay 1000
            zijiu=zijiu+1
            sha=sha+1
            Plugin Msg.ShowScrTXT(6, 118, 122, 145, "杀怪数"&sha, "0000FF")
        EndIf 
        IfColor mx,my,21204A,2
            Plugin Bkgnd.KeyPress(hwnd,32)
            Plugin Bkgnd.KeyPress(hwnd,32)
            zijiu=0
            Goto 开始
        Else 
            Delay 1000
            If zijiu>=zi
                zijiu=0
                Goto 开始
            EndIf 
            Goto 捡取
            Goto 开始
        EndIf 
    EndIf 
EndIf 
//下面这句用于向后台窗口句柄(变量：Hwnd)发送一个键盘(扫描码：65)按键
Plugin Bkgnd.KeyPress(hwnd, 77)
Plugin XY = Bkgnd.FindColorEx(hwnd,mapx,mapy,maprx,mapry,"1818DE",0, 0.8)
//下面这句用于分割字符串
MyArray = Split(XY, "|")
//下面这句将字符串转换成数值
X = CInt(MyArray(0)): Y = CInt(MyArray(1))
Delay 1000
If X>-1 and Y>-1
    Plugin Bkgnd.LeftClick(hwnd, X, Y)
    Plugin Bkgnd.KeyPress(hwnd, 77)
EndIf 
Goto 开始
//Plugin Bkgnd.LeftClick(hwnd,400,400)