Delay 1000
        FindPic LX,LY,RX,RY,"Attachment:\完成.bmp",0.9,intX,intY
        If intX > 0 And intY > 0 Then 
            Call 完成
        End If
        
        Call 接受
        Call 返回
        w = 1
    Else 

        Delay 1000
        FindPic LX,LY,RX,RY,"Attachment:\闻太师logo2.bmp",0.9,intX,intY
        If intX > 0 And intY > 0 Then      
            Call 人物
            Call 闻太师
            iy = 0
            While iy = 0
                KeyPress "Up", 1
                Delay 1000
                FindPic LX,LY,RX,RY,"Attachment:\封妖任务.bmp",0.9,intX,intY
                If intX> 0 And intY> 0 Then
                    MoveTo intX, intY
                    LeftClick 1
                    iy = 1
                End If
            Wend           
            Call 完狮
            Call 完狼
            Call 完蛇
            Call 完猴
            Call 返回            
            w = 1
        End If        
    End If

    Do Until w = 0

        If var1 = 0 Then 
            Call Plugin.Msg.ShowScrTXT(RX + 5, LY +80, RX + 250, LY +110, "狮", "ff00ff")
            Call 人物
            Call 狮
            Call 选择
            Delay 800
            MoveTo LX, LY
            FindPic LX,LY,RX,RY,"Attachment:\战斗.bmp",0.8,intX,intY
            If intX > 0 And intY > 0 Then 
                Call 战斗
                Call 战斗中
            Else 
                Call 返回

            End If
        End If

        If var2 = 0 Then 
            Call Plugin.Msg.ShowScrTXT(RX + 5, LY +80, RX + 250, LY +110, "狼", "ff00ff")
            Call 人物
            Call 狼
            Call 选择
            Delay 800
            MoveTo LX, LY
            FindPic LX,LY,RX,RY,"Attachment:\战斗.bmp",0.8,intX,intY
            If intX > 0 And intY > 0 Then 
                Call 战斗
                Call 战斗中
            Else 
                Call 返回

            End If
        End If

        If var3 = 0 Then 
            Call Plugin.Msg.ShowScrTXT(RX + 5, LY +80, RX + 250, LY +110, "猴", "ff00ff")
            Call 人物
            Call 猴
            Call 选择
            Delay 800
            MoveTo LX, LY
            FindPic LX,LY,RX,RY,"Attachment:\战斗.bmp",0.8,intX,intY
            If intX > 0 And intY > 0 Then 
                Call 战斗
                Call 战斗中
            Else 
                Call 返回

            End If
        End If
       
        If var4 = 0 Then 
            Call Plugin.Msg.ShowScrTXT(RX + 5, LY +80, RX + 250, LY +110, "蛇","ff00ff")
            Call 人物
            call 下一页
            Call 蛇
            Call 选择
            Delay 800
            MoveTo LX, LY
            FindPic LX,LY,RX,RY,"Attachment:\战斗.bmp",0.8,intX,intY
            If intX > 0 And intY > 0 Then