通用脚本，把全屏分成很多区域找怪！ 

本脚本不能单独运行，只能结合到游戏脚本中~启动热键为，中止热键为。 

运行环境：分辨率：1440×900 色深：32位 操作系统：Windows XP 按键精灵版本：7.00.3730

@兄弟工程师01    2009/3/19

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。是怪的话就攻击，杀死后跳到开始，重新开始找怪；不是的话，就跳到下一格接着找！