Call FindPic(0,0,1024,768,"Attachment:\球.bmp",0.9,intX,intY)
                            If intx>0 Then
                                MoveTo intx+23,inty+41
                                Delay 300
                                LeftClick 1
                            End if
                            Delay 500
                            MoveTo m+174,n-401
                            Delay 100
                            var=GetCursorShape(0)
                            If var=1227848726 Then
                                Delay 500
                                LeftClick 1
                            End if
                        End if
                    Else
                        KeyDown 18,1
                        KeyPress 65,1
                        KeyUp 18,1
                    End if
                End if
                //判断是否退出画面
                //下面这句在屏幕区域范围内查找多点颜色,返回左上角第2点颜色位置坐标
                XY = Plugin.Color.FindMutiColor(0, 0, 1024, 768, "6ADCE6", "1|0|5EDCE6,-1|1|71F8FF,0|1|60F7FF,1|1|50F6FF,2|1|3CF6FF,3|1|1E9CB1,-2|2|50D8E6,-1|2|50F4FF,0|2|3EF3FF,1|2|32F2FF,2|2|2DECFC,-2|3|36D4E6,-1|3|30EEFF,0|3|29ECFE,1|3|28E8FC,2|3|25DEF7,3|3|1FBEDC,4|3|1E5254,-1|4|23E1FB,0|4|21DCF8,1|4|20D8F6,2|4|1FD2F3,0|5|1ABEDF,1|5|19BDDE,-4|6|31E2FF,5|6|3CE4FF,-5|7|14D6FD,-2|7|4BE3FF,-1|7|52E4FF,0|7|4DE3FF,1|7|4CE3FF,2|7|33DFFF,3|7|14D5FC,6|7|14D3FB,-2|8|35DCFF,-1|8|2DDAFF,0|8|26D9FF,1|8|26D9FF,2|8|10D4FE,3|8|0EC5F6,-2|9|20D4FF,-1|9|0FD1FF,0|9|0BCFFE,1|9|0BCEFE,2|9|0AC5F9,3|9|09BAF2,-2|10|07B3E4,-1|10|06C3FA,0|10|05C2F9,1|10|05BFF7,2|10|05B6F1,3|10|069BD2,0|11|02ADEC,1|11|02ACEE,2|11|0496D1", 1)
                //下面这句用于分割字符串
                MyArray = Split(XY, "|")
                //下面这句将字符串转换成数值
                X = Clng(MyArray(0)): Y = Clng(MyArray(1))
                If x>0 Then
                    MoveTo m+143,n-575
                    Goto 退出战斗
                End if
            Wend
        End if
        Delay 1000
        While 1
            Call FindPic(0,0,1024,768,"Attachment:\法.bmp",0.9,intX,intY)
            If intx>0 Then
                //人物操作
                KeyDown 18,1
                KeyPress 68,1
                KeyUp 18,1
                Delay 100
                //宠物操作
                Call FindPic(0,0,1024,768,"Attachment:\宠保.bmp",0.9,intX,intY)
                If intx>0 Then
                    Delay 100
                    MoveTo intx,inty
                    Delay 300
                    LeftClick 1
                    MoveTo m+667,n-136
                    Delay 100
                    LeftClick 1
                End if
            End if
            //判断是否退出画面
            //下面这句在屏幕区域范围内查找多点颜色,返回左上角第2点颜色位置坐标
            XY = Plugin.Color.FindMutiColor(0, 0, 1024, 768, "6ADCE6", "1|0|5EDCE6,-1|1|71F8FF,0|1|60F7FF,1|1|50F6FF,2|1|3CF6FF,3|1|1E9CB1,-2|2|50D8E6,-1|2|50F4FF,0|2|3EF3FF,1|2|32F2FF,2|2|2DECFC,-2|3|36D4E6,-1|3|30EEFF,0|3|29ECFE,1|3|28E8FC,2|3|25DEF7,3|3|1FBEDC,4|3|1E5254,-1|4|23E1FB,0|4|21DCF8,1|4|20D8F6,2|4|1FD2F3,0|5|1ABEDF,1|5|19BDDE,-4|6|31E2FF,5|6|3CE4FF,-5|7|14D6FD,-2|7|4BE3FF,-1|7|52E4FF,0|7|4DE3FF,1|7|4CE3FF,2|7|33DFFF,3|7|14D5FC,6|7|14D3FB,-2|8|35DCFF,-1|8|2DDAFF,0|8|26D9FF,1|8|26D9FF,2|8|10D4FE,3|8|0EC5F6,-2|9|20D4FF,-1|9|0FD1FF,0|9|0BCFFE,1|9|0BCEFE,2|9|0AC5F9,3|9|09BAF2,-2|10|07B3E4,-1|10|06C3FA,0|10|05C2F9,1|10|05BFF7,2|10|05B6F1,3|10|069BD2,0|11|02ADEC,1|11|02ACEE,2|11|0496D1", 1)
            //下面这句用于分割字符串
            MyArray = Split(XY, "|")
            //下面这句将字符串转换成数值
            X = Clng(MyArray(0)): Y = Clng(MyArray(1))
            If x>0 Then
                MoveTo m+143,n-575
                Goto 退出战斗
            End if
        Wend
    End if
    Rem 退出战斗
    c=c+1
    TracePrint c
    Delay 1000
    Call FindPic(0,0,1024,768,"Attachment:\你成功的到达了目的地.bmp",0.9,intX,intY)
    k=GetPixelColor(m+159,n-306)
    l=GetPixelColor(m+616,n-306)
    If k="CDBB5F" and l="CDBB5F" Then
        Goto 你
    End if
    If intx>0 Then
        Rem 你
        Delay 500
        MoveTo m+599,n-358
        LeftClick 1
        Call 交任务()
    End if
    Delay 500
Wend
Sub 交任务()
    While r<150
        r=r+6
        d=0
        While d<2*3.141592654
            d=d+0.04
            x=x0+r*sin(d)
            y=y0-r*cos(d)
            MoveTo x,y
            var=GetCursorShape(0)
            If var=1568432796 Then
                LeftClick 1
                Goto QMScript_1