VBS dim NumA,NumB,NumC,NumK,NumN,CenterX,CenterY,GBX,GBY,StepX,StepY
//NumA--X轴移动的变量,NumB--Y轴移动的变量,NumK--中间变量
VBS NumA=0:NumB=0:NumC=0:CenterX=385:CenterY=310:StepX=82:StepY=66
//CenterX,CenterY---中心坐标(一般是人数) StepY,StepY--步长
//****************************主程序开始**************************************
While NumC<3
    //NumC---三圈, 相当会把找怪范围会成25个格
    VBS NumN=NumC*8:NumK=0
    //NumN---找怪的格子位置
    While NumK<NumN
        //向下移动
        If NumK>0 and NumK<(NumN/4)
            VBS NumB=NumB+1
        EndIf 
        //向左移动
        If NumK>=(NumN/4) and NumK<(NumN/2)
            VBS NumA=NumA-1
        EndIf 
        //向上移动
        If NumK>=(NumN/2) and NumK<(NumN/4)*3
            VBS NumB=NumB-1
        EndIf 
        //向右移动
        If NumK>=(NumN/4)*3 and NumK<NumN
            VBS NumA=NumA+1
        EndIf 
        //每一格的中心坐标
        VBS GBX=CenterX+StepX*NumA
        VBS GBY=CenterY+StepY*NumB
        Delay Time/2
        //***************查看运行效果********************
        //如果想看本脚本的执行路线,请打开图画,再打把下面三句前的//去掉
        //MoveTo GBX GBY
        //Delay 100
        //LeftClick 1
        //*******************************************
        //×××××××××××××××××××××××××××××××××××××××××××××××××××××××××××××××
        //×××××××××××××××××××××××××××××  找怪部分 ××××××××××××××××××××××××××××××
        VBSCall FindColorEx(GBX-StepX/2,GBY-StepY/2,GBX+StepX/2,GBY+StepY/2,"FFFFFF",1,0.6,AX,AY)
        //“FFFFFF”----怪的色,其它部分不要动,这里也可以改成在(GBX-StepX/2,GBY-StepY/2,GBX+StepX/2,GBY+StepY/2)范围内找图片
        Delay Time/2
        If AX>0
            //找到色
            MoveTo AX,AY
            //移动到AX,AY
            //*****判断是否是怪********
            //gosub Mon
            //<判断是否是怪>子程序在这里调用!
            //*************************
            Delay Time
            Goto KillMon
        EndIf 
        //××××××××××××××××××××××××××××××××××××××××××××××××××××××××××××
        VBS NumK=NumK+1
    EndFor 
    VBS NumA=NumA+1:NumC=NumC+1
EndFor 
//************************************主程序结束***************************************
//*************************************************************************************
//******************** 打怪 ********************
Rem KillMon
//下面请自己添加打怪要的动作
//提示:1。可以先判断是否是怪。[要判断的话,就写个子程序,上面有提示<判断是否是怪>调用的地方。]
//      2。是怪的话就攻击,杀死后跳到开始,重新开始找怪;不是的话,就跳到下一格接着找!