Rem 开始//标记开始PutAttachment //展开附件(默认目录)VBS Dim n//定义变量nVBS n=0//赋值n=0VBSCall GetCursorPos(a,b)//提取当前鼠标的坐标Rem 2//标记2Delay 100//延时100毫秒VBSCall FindPic(0,0,1280,1024,"111.bmp",0.7,x,y)//在屏幕区域(我的是1280*1024)寻找图片“111.bmp”相似度为0.7,x,y为找到的图片的左上角坐标If x>0 and y>0//如果找到图片If n=0//如果n=0Delay 100VBS n=n+1//表达式n=n+1Delay 100Goto 2//跳转到标记2EndIf //条件结束If n=1//如果n=1MoveTo x y//鼠标移动到x,yDelay 100LeftDoubleClick 1//双击鼠标左键Delay 300KeyPress 116,1//按键F5Delay 300MoveTo a,b//鼠标返回到之前提取的鼠标位置Delay 100Goto 开始//跳转到标记开始EndIf //条件结束EndIf //条件结束If x=-1 and y=-1//如果找不到图片VBSCall FindPic(0,0,1280,1024,"ks.bmp",0.7,a,b)//寻找开始图片If a>0 and b>0//如果找到Delay 300KeyPress 116,1//按键F5Delay 300Goto 开始//跳转到标记开始EndIf //条件结束If a=-1 and b=-1//如果找不到图片Delay 500Goto 开始EndIf EndIf “111.BMP”是我截取的返回那个按钮的图··”ks.bmp“是开始按钮的截图。因为图是BMP格式,我权限又太低·所以就不能上传图了
用挂当心封号,不要到了游戏号被封再后悔.有些挂上都带有病毒,病毒是会盗QQ号和QB的.
我有现成的按键精灵,如果您需要,把QQ留下,我可以传给您,希望可以帮到你……
呵呵 祝您游戏愉快哦