EndFor 
        VBSCall quse5=GetPixelColor(237+ydlx,214+ydly)
        VBSCall quse6=GetPixelColor(357+ydlx,203+ydly)
        If quse5=quse6
            Goto start
        Else 
            Delay 500
            Goto 进入战斗
        EndIf 
    EndIf 
Return