If FindPet <> "-1|-1"
            PetPos=split(FindPet,"|")
            PetX=CInt(PetPos(0))
            PetY=CInt(PetPos(1))
            FoodArray=split(FoodXY,"|")
            FoodX=CInt(FoodArray(0))
            FoodY=CInt(FoodArray(1))
            Plugin Bkgnd.LeftClick(Hwnd,130,390)
            Delay 200
            Plugin Bkgnd.LeftDown(Hwnd, FoodX, FoodY)
            //Delay 200
            Plugin Bkgnd.MoveTo(Hwnd, PetX, PetY)
            Delay 200
            Plugin Bkgnd.LeftClick(Hwnd, PetX, PetY)
            Delay FeedDelay
        EndIf 
    EndIf 
    Plugin FindPet = Bkgnd.FindColor(Hwnd,X1,Y1,X2,Y2,PetColor)
    If FindPet <> "-1|-1"
        PetPos=split(FindPet,"|")
        PetX=CInt(PetPos(0))
        PetY=CInt(PetPos(1))
        //拿绳子
        Plugin Bkgnd.LeftClick(Hwnd,130,390)
        Delay 200
        Plugin Bkgnd.LeftDown(Hwnd, 400, 520)
        //Delay 200
        Plugin Bkgnd.MoveTo(Hwnd, PetX, PetY)
        Delay 200
        Plugin Bkgnd.LeftClick(Hwnd, PetX, PetY)
        Delay 500
        Plugin Bkgnd.LeftClick(Hwnd,130, 390)
        FlagOver=0
    Else 
        FlagOver=1
    EndIf 
Return 自动引导宝贝跳绳
Sub OnScriptExit
    Plugin T2 =GetSysInfo.GetTime()
    T=round((T2-T1)/1000/60,1)
    n=round(n/1.6,0)
    text = "第 "&m&" 次：结束时间"&Time&"  本次共运行了"&T&"分钟，跳了 "&n&" 下（估计值）"
    //下面这句是向目标文件(LogFile)写入文本内容(text)
    Plugin File.WriteFileEx(LogFile, text)
    Plugin EndTime =GetSysInfo.GetTime()
    TotalTime=round((EndTime-StartTime)/1000/60,0)
    text= "----结束！"&Time&"  共经过"&TotalTime&"分钟，实际尝试自动起跳"&m&"次"
    //下面这句是向目标文件(LogFile)写入文本内容(text)
    Plugin File.WriteFileEx(LogFile, text)
    MessageBox "脚本运行结束！快看看创造的记录吧~~"
    VBSCall RunApp(LogFile)
Return