secondmdust=0
                        If makeoredust=1
                            If blduptime>=30000
                                secondmdust=1
                                Gosub makeoredustsub
                                secondmdust=0
                                Delay 30000
                            EndIf 
                            //TracePrint "开始磨矿粉 "
                            gameinfotext="[" & time  & "]正在磨矿粉..."  & vbcrlf & gameinfotext
                            Gosub renewDrgGameInf2
                            Gosub makeoredustsub
                        EndIf 
                        If eatbread=0
                            If makeoredust=1
                                If bldUpTime>=30000
                                    //磨粉的过程耗时3*maxdly
                                    TracePrint "wait for " & bldUpTime-30000-int((blduptime-30000)/(3*maxdly))*3*maxdly
                                    gameinfotext="[" & time  & "]wait for.. " & bldUpTime-30000-int((blduptime-30000)/(3*maxdly))*3*maxdly  & vbcrlf & gameinfotext
                                    Gosub renewDrgGameInf2
                                    Delay bldUpTime-30000-int((blduptime-30000)/(3*maxdly))*3*maxdly
                                Else 
                                    TracePrint "wait for " & bldUpTime-3*maxdly
                                    gameinfotext="[" & time  & "]wait for.. " & bldUpTime-30000-int((blduptime-30000)/(3*maxdly))*3*maxdly & vbcrlf & gameinfotext
                                    Gosub renewDrgGameInf2
                                    Delay bldUpTime-3*maxdly
                                EndIf 
                            Else 
                                TracePrint "wait for " & bldUpTime
                                gameinfotext="[" & time  & "]wait for.. " & bldUpTime  & vbcrlf & gameinfotext
                                Gosub renewDrgGameInf2
                                Delay bldUpTime
                            EndIf 
                        Else 
                            TracePrint "wait for " & maxdly
                            gameinfotext="[" & time  & "]wait for.. " & maxdly  & vbcrlf & gameinfotext
                            Gosub renewDrgGameInf2
                            Delay maxdly
                        EndIf 
                        Plugin BGKM5.LClick(hwnd,650-main_win_left,78-main_win_top)
                        Plugin BGKM5.LClick(hwnd,650-main_win_left,78-main_win_top)
                        Plugin BGKM5.LClick(hwnd,650-main_win_left,78-main_win_top)
                    Else 
                        //未授权是空白则继续狩猎
                        TracePrint "未授权，继续狩猎!"
                        gameinfotext="[" & time  & "]" & "未授权，继续狩猎!" & vbcrlf & gameinfotext
                        Gosub renewDrgGameInf2
                        Plugin BGKM5.LClick(hwnd,650-main_win_left,78-main_win_top)
                        Plugin BGKM5.LClick(hwnd,650-main_win_left,78-main_win_top)
                        Plugin BGKM5.LClick(hwnd,650-main_win_left,78-main_win_top)
                        //bldUpTime=int(blood/bldUpSpd)*1000
                        //Delay maxDly+bldUpTime
                    EndIf 
                EndIf 
            EndIf 
        EndIf 
    EndIf 
    Delay mindly
EndWhile 
EndScript 
//Rem xxxx
//Gosub die
Sub die
    //msgbox ""
    dim fh_i,fh_j
    diedly=5000
    //设置复活路径,0复活点12345分别表示路径所在行
    //烈焰谷//fhlj="2120232"
    //安格里拉村    fhlj="22015"
    //烈焰广场    fhlj="201"
    Plugin BGKM5.LClick(hwnd,595-main_win_left,77-main_win_top)
    Plugin BGKM5.LClick(hwnd,595-main_win_left,77-main_win_top)
    Plugin BGKM5.LClick(hwnd,595-main_win_left,77-main_win_top)
    Delay diedly
    fh_i=1
    While fh_i<=len(fhlj)
        fh_j=mid(fhlj,fh_i,1)*1
        //msgbox fh_j
        Plugin BGKM5.LClick(hwnd,fhx(fh_j)-main_win_left,fhy(fh_j)-main_win_top)
        Plugin BGKM5.LClick(hwnd,fhx(fh_j)-main_win_left,fhy(fh_j)-main_win_top)
        If fh_j=0
            diedly=diedly+20000
        EndIf 
        fh_i=fh_i+1
        Delay diedly
    EndWhile 
    diedly=diedly-20000
    Plugin BGKM5.LClick(hwnd,650-main_win_left,78-main_win_top)
    Plugin BGKM5.LClick(hwnd,650-main_win_left,78-main_win_top)
    Plugin BGKM5.LClick(hwnd,650-main_win_left,78-main_win_top)
    Delay diedly
Return 
EndScript 
Sub eatbreadsub
    dim breadxy
    dim ebx,eby
    Rem restarteb
    Plugin BGKM5.LClick(hwnd,296-main_win_left,78-main_win_top)
    Delay 1000
    Plugin ebsubxy=Bkgnd.FindColor(hwnd,285-main_win_left,112-main_win_top,287-main_win_left,114-main_win_top,"A6")