EndIf 
//
//点的开面版的话就继续循环
VBSCall FindColorEx(140,40,140,40,"63a2bd",1,0.8,x,y)
If x>0 and y>0
    Delay 10
    Goto 抢点循环
Else 
    //点不开面版，就再检查下
    MoveTo a,b
    Delay 20
    Goto 检测对话框
EndIf 
//
//
////////////////////////
Rem 结束
//提示信息
Delay 500
//提示
MoveTo 580,560
Delay 20
LeftClick 2
Delay 20
SayString "/自己 恭喜！您已经进入任务场景..."
Delay 500
KeyPress 13,2
Delay 10
////////////////////////
//脚本结束
EndScript 
//
//
//////////////////////////////////////////////////////
//========================================================
//###一些过程的定义
//========================================================
//找名字//////////////////////////////////////////////
Sub NPC名字找图
    Delay 20
    VBSCall FindPic(20,20,770,500,"Attachment:\密.bmp",1,x,y)
    If x>0 and y>0
        Delay 300
        LeftClick 2
        Delay 400
        Goto 记NPC
    Else 
    EndIf 
Return 
/////////////////////////////////////////////////////
Sub 移动总循环
    While k < 19
        Gosub 循环移动鼠标
        k=k+1
        Delay 10
    EndWhile 
    MessageBox "无法找到NPC，请将人物移动到任务NPC附近，再启动脚本"
EndScript 
Return 
//////////////////////////////////////////////////////
Sub 循环移动鼠标
    //X的移动循环
    While i < k
        //方向变量标记，0为正，1为负
        If f=0
            MoveR 30,0
            Delay 200
            Gosub NPC名字找图
            Delay 20
        Else 
            MoveR -30,0
            Delay 200
            Gosub NPC名字找图
            Delay 20
        EndIf 
        i=i+1
    EndWhile 
    i=0
    // Y的移动循环
    While j < k
        If f=0
            MoveR 0,30
            Delay 200
            Gosub NPC名字找图
            Delay 20
        Else 
            MoveR 0,-30
            Delay 200
            Gosub NPC名字找图
            Delay 20
        EndIf 
        j=j+1
    EndWhile 
    j=0
    //改变方向
    If f=0
        f=1
    Else 
        f=0
    EndIf