格‎罗‎格罗亚传奇 驯化魂宠离线辅‎助脚本大家觉得怎样?

哪儿有微信跳一跳脚本呢?_百度知道
哪儿有微信跳一跳脚本呢?
比较多了。&这个选&的&ROOT,&这个&格外的&受欢&免&游&lrm&蜂&这里&可以&窝&戏&lrm
为您推荐:
其他类似问题
您可能关注的内容
换一换
回答问题,赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。我下载了个猎人MM的LRMM-Client,在一半的时候我取消了,现在无法删除了,我用尽我所知道的方法都不行,用粉碎机也只能把他的空间释放出来,图标也不能删除,磁盘也没有问题。谁知道该怎么删除这个图标呀?摆着太难看了,谢谢各位大狭了,我把我的全部家当100分都贡献出来了
首先看你是用什么软件下载的,你删除后下载任务是否取消了?
你可以进入注册表,在编辑---查找里输入LRMM-Client,找到后清除所有与他有关的注册信息
再用优化软件清理一次,重新启动电脑,看看能不能删除了
估计这样就可以了
也可以按照下面的方法:
一、常规解决办法:
  1.注消或重启电脑,然后再试着删除。
  2.进入“安全模式删除”。
  3.在纯DOS命令行下使用DEL,DELTREE和RD命令将其删除。
  4.如果是文件夹中有比较多的子目录或文件而导致无法删除,可先删除该文件夹中的子目录和文件,再删除文件夹。
  5.在任务管理器中结束Explorer.exe进程,然后在命令提示符窗口删除文件。
  6.如果你有安装ACDSee,FlashFXP,Nero,Total这几个软件,可以尝试在这几个软件中删除文件夹。
其他答案(共65个回答)
lientr 的文件在注册表中查找,再删除,用优化大师清除垃圾文件,OK。
首先看你是用什么软件下载的,你删除后下载任务是否取消了?
你可以进入注册表,在编辑---查找里输入LRMM-Client,找到后清除所有与他有关的注册信息
再用优化软件清理一次,重新启动电脑,看看能不能删除了
估计这样就可以了
也可以按照下面的方法:
一、常规解决办法:
  1.注消或重启电脑,然后再试着删除。
  2.进入“安全模式删除”。
  3.在纯DOS命令行下使用DEL,DELTREE和RD命令将其删除。
  4.如果是文件夹中有比较多的子目录或文件而导致无法删除,可先删除该文件夹中的子目录和文件,再删除文件夹。
  5.在任务管理器中结束Explorer.exe进程,然后在命令提示符窗口删除文件。
  6.如果你有安装ACDSee,FlashFXP,Nero,Total这几个软件,可以尝试在这几个软件中删除文件夹。
首先看你是用什么软件下载的,你删除后下载任务是否取消了?
还有什么程序正在使用猎人MM的LRMM-Client,把正在使用MM的LRMM-Client的软件停止后,试着删除,这样应试可解决
你可以进入注册表,在编辑---查找里输入LRMM-Client,找到后清除所有与他有关的注册信息
再用优化软件清理一次,重新启动电脑,看看能不能删除了
估计这样就可以了
也可以按照下面的方法:
一、常规解决办法:
  1.注消或重启电脑,然后再试着删除。
  2.进入“安全模式删除”。
  3.在纯DOS命令行下使用DEL,DELTREE和RD命令将其删除。
  4.如果是文件夹中有比较多的子目录或文件而导致无法删除,可先删除该文件夹中的子目录和文件,再删除文件夹。
  5.在任务管理器中结束Explorer.exe进程,然后在命令提示符窗口删除文件。
  6.如果你有安装ACDSee,FlashFXP,Nero,Total这几个软件,可以尝试在这几个软件中删除文件夹。
首先看你是用什么软件下载的,你删除后下载任务是否取消了?
你可以进入注册表,在编辑---查找里输入LRMM-Client,找到后清除所有与他有关的注册信息
再用优化软件清理一次,重新启动电脑,看看能不能删除了
估计这样就可以了
也可以按照下面的方法:
一、常规解决办法:
  1.注消或重启电脑,然后再试着删除。
  2.进入“安全模式删除”。
  3.在纯DOS命令行下使用DEL,DELTREE和RD命令将其删除。
  4.如果是文件夹中有比较多的子目录或文件而导致无法删除,可先删除该文件夹中的子目录和文件,再删除文件夹。
  5.在任务管理器中结束Explorer.exe进程,然后在命令提示符窗口删除文件。
  6.如果你有安装ACDSee,FlashFXP,Nero,Total这几个软件,可以尝试在这几个软件中删除文件夹。
首先看你是用什么软件下载的,你删除后下载任务是否取消了?
你可以进入注册表,在编辑---查找里输入LRMM-Client,找到后清除所有与他有关的注册信息
再用优化软件清理一次,重新启动电脑,看看能不能删除了
估计这样就可以了
也可以按照下面的方法:
一、常规解决办法:
  1.注消或重启电脑,然后再试着删除。
  2.进入“安全模式删除”。
  3.在纯DOS命令行下使用DEL,DELTREE和RD命令将其删除。
  4.如果是文件夹中有比较多的子目录或文件而导致无法删除,可先删除该文件夹中的子目录和文件,再删除文件夹。
  5.在任务管理器中结束Explorer.exe进程,然后在命令提示符窗口删除文件。
  6.如果你有安装ACDSee,FlashFXP,Nero,Total这几个软件,可以尝试在这几个软件中删除文件夹。
那是你加入的代码有脚本代码错误,你把新加入的代码换掉就可以了!
如果你没有保存那是没有办法恢复了,只能重新再来。
建议你以后再写文章时在文挡里写好再复制过来,最最安全!
我们一般是这样操作的。
右击桌面->属性->设置,
在“颜色质量”选项中选16位就好了
美军不是专业狙击手,可以理解。
答: 微信手工拉票收费按照目前的行情,人工直投一票至少要0.2元,要是需要加关注,要留言、要验证码什么的,或者还有更复杂的下载,注册,微信朋友圈点赞之类的投票,那这价...
答: 要看是什么网络电话软件 KC与SKY 很多网络电话 1毛一分钟(全国) 1-7点免费打
答: qq空间的文章是存放在网络上的。
发布原理:
你打开qq空间,写文章 --> 点发布的时候,数据将被上传到腾讯公司的服务器里存储。
读取原理:
打开你的QQ空间...
大家还关注
Copyright &
Corporation, All Rights Reserved
确定举报此问题
举报原因(必选):
广告或垃圾信息
激进时政或意识形态话题
不雅词句或人身攻击
侵犯他人隐私
其它违法和不良信息
报告,这不是个问题
报告原因(必选):
这不是个问题
这个问题分类似乎错了
这个不是我熟悉的地区
相关问答:123456789101112131415&铜雀激斗的离线脚本在哪有呢?_百度知道
&铜雀激斗的离线脚本在哪有呢?
我有更好的答案
游戏蜂窝有
具体怎样呢?
&这里提供的离线脚本多&用于下载和使用&才是最特别的。
为您推荐:
其他类似问题
换一换
回答问题,赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。当前位置: >>
按键精灵网游脚本编写教程
按键精灵学习教程一、 键盘命令(2~5页) 二、鼠标命令(5~13页) 三、控制命令(13~22页) 四、颜色/图像命令(22~28页) 五、其他命令(28~355页) 五、网游脚本实例(35~最后)一、 键盘命令命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)??脚本例子: (7.x语法)?? 命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)??脚本例子: (7.x语法)??命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)?? 脚本例子: (7.x语法)??命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)?? 脚本例子: (7.x语法)??命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)??脚本例子: (7.x语法)?? 二、鼠标命令命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)??脚本例子: (7.x语法)??命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)?? 脚本例子: (7.x语法)??命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)?? 脚本例子: (7.x语法)??命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)??脚本例子: (7.x语法)??命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)?? 脚本例子: (7.x语法)??命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)??脚本例子: (7.x语法)?? 命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)??脚本例子: (7.x语法)??命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)??脚本例子: (7.x语法)??命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)??脚本例子: (7.x语法)??命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)?? 脚本例子: (7.x语法)??命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)?? 脚本例子: (7.x语法)??命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)??脚本例子: (7.x语法)?? 命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)??脚本例子: (7.x语法)?? 命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)?? 脚本例子: (7.x语法)??命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)??脚本例子: (7.x语法)??三、控制命令命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)?? 脚本例子: (7.x语法)?? 命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)??
脚本例子: (7.x语法)?? 命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)?? 脚本例子: (7.x语法)??命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)?? 脚本例子: (7.x语法)?? 命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)??脚本例子: (7.x语法)?? 命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)??脚本例子: (7.x语法)??命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)?? 脚本例子: (7.x语法)??命令名称: 命令功能: 命令参数:返 回 值: 脚本例子: (8.x语法)?? 脚本例子: (7.x语法)??命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)?? 脚本例子: (7.x语法)??命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)??脚本例子: (7.x语法)??命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)?? 脚本例子: (7.x语法)?? 命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)?? 脚本例子: (7.x语法)??命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)??脚本例子: (7.x语法)?? 四、颜色/图像 命令命令名称: 命令功能: 命令参数:返 回 值: 脚本例子: (8.x语法)??脚本例子: (7.x语法)?? 命令名称: 命令功能: 命令参数:返 回 值: 脚本例子: (8.x语法)?? 脚本例子: (7.x语法)??命令名称: 命令功能: 命令参数:返 回 值: 脚本例子: (8.x语法)?? 脚本例子: (7.x语法)??命令名称: 命令功能: 命令参数:返 回 值: 脚本例子: (8.x语法)??
脚本例子: (7.x语法)?? 命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)?? 脚本例子: (7.x语法)??五、其他命令命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)??脚本例子: (7.x语法)?? 命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)??脚本例子: (7.x语法)??命令名称: 命令功能: 命令参数:返 回 值: 脚本例子: (8.x语法)?? 脚本例子: (7.x语法)??命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)?? 脚本例子: (7.x语法)??命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)??脚本例子: (7.x语法)?? 命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)??脚本例子: (7.x语法)?? 命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)??脚本例子: (7.x语法)?? 命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)??脚本例子: (7.x语法)??命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)??脚本例子: (7.x语法)??命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)?? 脚本例子: (7.x语法)?? 命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)??脚本例子: (7.x语法)??命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)?? 脚本例子: (7.x语法)??命令名称: 命令功能: 命令参数: 返 回 值: 脚本例子: (8.x语法)??脚本例子: (7.x语法)?? Windowns 扫 雷 游 戏 脚 本 实 例:Rem Start LockMouse //查找扫雷窗口,句柄存 为hd Plugin hd=Window.Find(& 扫雷&,&扫雷&) If hd=0 MessageBox &你应该没有 打开扫雷游戏吧?& Else //获得窗口四个角的坐标 Plugin WRect=Window.GetWind owRect(hd) VBS Dim x(4) VBS i=1 While i&=4 VBS WL=Len(WRect) VBS LL=InStr(WRect,&|&) If LL&&0 VBS x(i)=left(WRect,LL1) VBS WRect=right(WRect,WlLL) Else VBS x(i)=WRect EndIf VBS i=i+1 EndWhile VBS Dim hg,sg //计算横格数 VBS hg=int((x(3)-x(1)20)/16) //计算竖格数 VBS sg=Int((x(4)-x(2)100)/16) MoveTo x(3)+1,x(4)+1 LeftClick 1 Delay 10 Plugin Window.SendKeyPress(hd, 88) Delay 10 Plugin Window.SendKeyPress(hd, 89) Delay 10 Plugin Window.SendKeyPress(hd, 90) Delay 10 Plugin Window.SendKeyPress(hd, 90) Delay 10 Plugin Window.SendKeyPress(hd, 89) Delay 10 Plugin Window.SendKeyPress(hd, 16) Delay 10 Plugin Window.Active(hd) //雷区最左上角一格的坐 标 VBS x0=x(1)+21:y0=x(2)+100 VBS i=0 //用鼠标扫描整个雷区 While i&sg VBS j=0 While j&hg MoveTo x0+j*16,y0+i*16 Delay 5 IfColor 0,0,ffffff,0 LeftClick 1 Else IfColor 0,0,0,0 Else KeyPress 116,1 Goto Start EndIf EndIf VBS j=j+1 EndWhile VBS i=i+1 EndWhile EndIf UnlockMouse EndScript按键插件《扫 雷》系列一【 读取内存】内存读取插件,用于 读取某窗体句柄所在进 程内存。与按键精灵本 身 提 供 的 “ VBSCall ReadMemory()”功能几乎 相同。 不同点在于: 1 、 VBSCall ReadMemory() 读 取 最 前 台 窗 口 内 存 。 Plugin Memory.Read() 读 取 某 窗 体的内存。 2 、 Memory 插 件 , 提 供 更多更丰富的功能。 在给出Memory插件 例 子 之 前 ,先 说说 windows如何管理进程内 存的,知其然要知其所 以然,避免概念上的错 误理解。 在说内存之前,我们 要知道windows是多进程 的 操 作 系 统 , CPU时 间 片根据进程优先级的不 同在各个进程中切换, 从而实现了多进程的管 理机制。要详细解释“进 程-内 存” 的 关 系 比 较复 杂,一两篇文章也说不 清楚。这里我就简要说 明几个与本文有关联的 系统知识。 绝大多数学过计算机 编程的同学,应该都清 楚,在编写程序的时 候,根本就没有多进程 的概念,也不会向这方 面想。但一到涉及到内 存的时候就会犯迷糊, windows这么多进程,到 底应该读取哪个地方的 内存呢?其实不是这样 的,windows只是模拟出 多进程的环境,实际的 运 算 都 在 CPU上 完 成 , 而 一 个 CPU在 一 个 时 间 只能处理一条指令,也 就是说,对于cpu而言, 只是单进程操作(请允 许 我 提 到 CPU、 指 令 这 些与汇编有关系的内 容,我想不到如何能把 这个概念简单的描述出 来,这些是概念,看懂 意思就没问题了)。 windows模拟多进程的操 作,大概是这样的:把 进程A送到CPU中处理20 微秒-&保存进程A环境-& 进程B送到CPU中处理20 微秒-&保存进程B环境… …一直循环这个过程。 CPU的 速 度 很 快 , 系 统 在多进程切换,我们基 现在轮到内存了:_) 内存这里是个比较卡 人的地方,当初我也卡 在这里过,其实当初也 是因为概念不明而已, 我在这里详细说说。 windows有一套自己的内 存管理方案,每个进程 都独享独立的4G虚拟地 址空间(注意这里,是 虚拟地址内存,非物理 内存,当初我就卡在这 里了)。这个4G,在每 个进程中都是真实存在 的,但因为是虚拟内存 (注意这里,这里所说 的 虚 拟 内 存和 调节 windows的虚拟内存不是 一个东西),程序用到 的内存部分,加载到物 理内存,供给cpu读取, 用不到的,依然还是硬 盘上的文件。所以实际 的物理内存占用并不高 。明白这个概念,之后 的东西就好办了。我们 在读取内存的时候,读 出来的都在虚拟里, windows是不允许用户直 接操作物理内存的(这 里 涉 及 到 ring0/3 环 的 问 题,与本文无关,略 过,只要记住,我们不 我反复强调了“进程内存”,是因为我当初卡 在这里过,如果看到这 里,你还是云里雾里, 那么建议你回头再看一 遍。 讲完了概念,进入正 题: 我们要做的,正是读 取windows自带的经典游 戏《扫雷》中的“ 雷” 所 在的位置,旨在用代码 描述内存插件的使用方 法。我始终坚信,代码 是最好的老师,比任何 教程都强。所以我直接 给出注释全面的代码, 以供分析。 //********************* ************* //* 以下例子只支持xp操 作系统中扫雷 * //********************* ************* // //hwnd中保存扫雷游戏的 窗体句柄 Dim hwnd //查找《扫雷》的窗体句 柄 Plugin hwnd=Window.Find(& 扫 雷&,&扫雷&) If hwnd=0 MessageBox &扫雷游戏没 有打开哟!& EndScript EndIf //x, y中分别保存当前扫 雷的长与宽的格子数量 Dim x, y Plugin x=Memory.Read32Bit(hw nd,&h1005334) Plugin y=Memory.Read32Bit(hw nd,&h1005338) //建个双重循环,循环所 有格子,这里用VBScript 的循环会很方便,所以 加入vbsbegin块 Import Memory.dll VBSBegin Dim i, j, value, strview strview=&说明:@代表安 全,*代表雷& & vbcrlf For i=0 to x-1 For j=0 to y-1 value=Memory.Read8Bit(h wnd,&h1005360+(j+i*32+ 1)) '注意:VBSBegin中的注 释是“'” '//8A=显示出的雷 '//8F=未显示出的雷 If value=&h8A& or value=&h8F& then strview=strview & & *& Else strview=strview & & @& End If Next strview=strview & vbcrlf Next MessageBox strview VBSEnd 相信大家都可以通过插 件的函数名称判断函数 的作用,以上代码很简 单,我不做过多讲解了 哈 下部分,轮到windows插 件,我会详细讲解“窗体 位置”的概念按键插件《扫 雷》系列二【 窗口位置】按照惯例,首先介绍 下“窗口坐标系”、“窗口 工作区”和“窗口客户区” 的概念,最后给出自动 扫雷脚本。 “窗口坐标系”是我自 创的描述词,术语叫什 么我还真不清楚。这个 概念很容易理解,我们 都知道桌面分辨率,分 辨率越高,显示的 桌面内容就越多。我们 也知道,窗口是“ 摆放” 在桌面上的,甚至可以 超出桌面范围(比如随 意把一个窗口拖到桌面 之外)。而窗口坐标系 就 窗口摆放在桌面的位 是 置 。 假 设 桌 面 是 1024 × 768,那么桌面左上角坐 标就是0,0。桌面右下角 坐标就是( 因 为是从0开始)。这样, 窗口所在桌面的坐标就 是“窗口坐标系”了。 “窗体工作区”和“ 窗 体客户区”,这两个词从 字面上很难理解,微软 的官方文档就是这么叫 的。我用一张图来表示 工作区和客户区 有什么不同。 从上图可以看出,工 作区包含了窗体的四条 边框,上面的边框最 宽,叫做标题栏,其他 的边框只有窄窄的一条 。为什么要区分工作区 和客户区呢?大家会议 下XP系统默认的标题栏 高度和98/2000系统默认 的标题栏高度就明白了 。也就是说,我们编写 按键脚本的时候,直接 从客 户区入手,这样就不用 考虑标题栏高度和四条 窗体边框的问题了。 下面的脚本例子,建 议大家输出看看结果, 对理解工作区和客户区 有帮助: //********************* ***** //*窗体工作区 与 窗体客 户区* //********************* ***** // //启动扫雷 VBSCall RunApp(&winmine.exe&) //等待扫雷启动完毕 Delay 500 dim hwnd Plugin hwnd=Window.Find(& 扫 雷&,&扫雷&) //移动扫雷窗口到0,0位置 Plugin Window.Move(hwnd,0,0) dim winrect, clirect //获得windows区域 Plugin winrect=Window.GetWind owRect(hwnd) //获得client区域 Plugin clirect=Window.GetClient Rect(hwnd) MessageBox & 窗 体 工 作 区:& & winrect & vbcrlf & &窗体客户区:& & clirect 明白 了基 本概 念之 后,下面给出扫雷脚本 的鼠标控制例子: //********************* ************* //* 以下例子只支持xp操 作系统中扫雷 * //********************* ************* // //hwnd中保存扫雷游戏的 窗体句柄 Dim hwnd //查找《扫雷》的窗体句 柄 Plugin hwnd=Window.Find(& 扫 雷&,&扫雷&) If hwnd=0 MessageBox &扫雷游戏没 有打开哟!& EndScript EndIf //获取扫雷窗口位置 dim cliectRect Plugin cliectRect=Window.GetCli entRect(hwnd) //rx, ry保存雷区左上角第 一个雷的坐标 dim rx, ry //按“|”分割字符串 dim tmp tmp=split(cliectRect,&|&) //:是VB里的一种多行语 句写成一行的用法,同 样试用于按键脚本 rx=cint(tmp(0))+20 : ry=cint(tmp(1))+60 //x, y中分别保存当前扫 雷的长与宽的格子数量 Dim x, y Plugin x=Memory.Read32Bit(hw nd,&h1005334) Plugin y=Memory.Read32Bit(hw nd,&h1005338) //建个双重循环,循环所 有格子,这里用VB的循 环会很方便,所以加入 vbsbegin块 Import Memory.dll VBSBegin Dim i, j, value For i=0 to x-1 For j=0 to y-1 value=Memory.Read8Bit(h wnd,&h1005360+(j+i*32+ 1)) '//F==非雷 If value&&&hF&then MoveTo rx+j*16,ry+i*16 Delay 100 RightClick 1 Delay 100 End If Next Next VBSEnd 如果上一章的内容弄懂 了,这篇还是真容易理 解的。 下章,准备说一下“消息 循环”机制,和用消息控 制扫雷按键插件《扫 雷》系列二【 窗口消息】 新人总会在论坛里看 到后台挂机,后台消 息,到底消息是什么, 为什么可以实现后台, 是本章描述的重点。同 样最后会给出消息的扫 雷例子。 消息,在windows里 占有至关重要的位置, 可以说windows就是由消 息驱动的。消息,顾名 思义,就是通知、告知 某个窗体或某个控件 现在应该接到了什么命 令。windows的消息非常 的多,有鼠标移动的, 键盘按下弹起的,有窗 口位置移动的,改变窗 体大小,最小化,最大 化等 。可以说,所能看到的 桌面窗体变化、鼠标键 盘操控,最终体现在 windows里的都是消息。 windows掌管一个大的消 息循环,为理解方面, 我用一张草图描述这个 流程: 由上图可知,消息最 终发送到每个窗体,每 个窗体接到这个消息命 令后,怎么处理那都是 各个窗体自己的活了。 但是前面的部分确是 由windows掌管的。 明确了以上的内容, 大家应该知道为什么有 些游戏用消息不好使, 有些游戏游戏用消息好 使了。如果游戏自己做 了某种判断,或者有 些反外挂的程序在运行 (比如NP),那么消息 对其无效,可以简单理 解,游戏对消息做了过 滤(这么描述不准确, 但我们只要知道了这 点,就 足够了,如想了解更多 消息的内容,百度上有 很多文章)。所以,消 息不是所有游戏都通用 的。 接下来说另外一个概 念,窗口的组成。我们 可以看到一个窗口,并 且拖拉,最小化它。但 是这个窗口,不一定由 一个窗体组成。比如 IE浏 览 器 ,IE浏 览 器 就 好比一个房子,里面有 很多房间,每个房间就 是一个窗体,这些房间 共同组成了房子。用过 VB的朋友,应该很容易 理解 。每拖的一个控件,都 有独立的窗口句柄(句 柄的概念在后面会讲 到 ) , 只 有table 除 外 。 只有游戏不同,一般的 游戏,通常只有一个窗 体,因 为是DX成像,反到不需 要这许多控件。什么是 DX 成 像 ? 就 是 用 DX 把 要显示的画面,画到窗 体上。 以上内容说的非常混 乱,简单理解就是,普 通应用程序有很多个窗 口组成一个大的窗口。 而游戏,一般只有一个 窗口。 这么多窗口, windows怎么知道哪个是 哪个呢?聪明的windows 引入了“ 窗体句柄” 的概 念。一个窗口对应一个 数字,这个数字在文档 中就叫做句柄了。注 意,没有一个句柄是相 同的,好像门牌号一 样,这样就可以顺利区 分到底在给哪个窗口发 送消息了。还有一点也 非常重要 ,这个句柄是windows随 机分配的,有效期只在 这个窗口销毁前。换句 话说,窗口A只要存在, 那么他的句柄就是固定 的,如果关闭、再启动 窗 口A,那么窗口A的句柄 就会变化。假如连续启 动了3个窗口A,那么3个 窗口A的句柄也不一样。 罗里八梭的说了这么 多,也不知道大家是否 有看明白。如果没看明 白,就回头再看一遍, 还看不明白,跟帖留言 。 总结一下我前面所说 的东西: 1 、 windows 掌 管 消 息 分 发,发到窗口后,由窗 口自行处理 2、一个窗口,可能由1N个窗口组成 3、每个窗体句柄,标识 一个窗体或控件 4、窗体句柄的生存周 期,就是窗体的生存周 期 5、同窗体每次启动,其 句柄并不相同 我使用了361的后台消息 插件,不多废话,直接 上例子: //********************* ************* //* 以下例子只支持xp操 作系统中扫雷 * //********************* ************* // //hwnd中保存扫雷游戏的 窗体句柄 Dim hwnd //查找《扫雷》的窗体句 柄 Plugin hwnd=Window.Find(& 扫 雷&,&扫雷&) If hwnd=0 MessageBox &扫雷游戏没 有打开哟!& EndScript EndIf //x, y中分别保存当前扫 雷的长与宽的格子数量 Dim x, y Plugin x=Memory.Read32Bit(hw nd,&h1005334) Plugin y=Memory.Read32Bit(hw nd,&h1005338) //建个双重循环,循环所 有格子,这里用VB的循 环会很方便,所以加入 vbsbegin块 Import Memory.dll Import BGKM5.dll VBSBegin Dim i, j, value For i=0 to x-1 For j=0 to y-1 value=Memory.Read8Bit(h wnd,&h1005360+(j+i*32+ 1)) '//小 于&h80的 , 都 不 是 雷 If value&&h80& then //这里的20和60大家体会 一下,16是雷格式的间 距:) BGKM5.LClick hwnd,20+j*16,60+i*16 Else BGKM5.RClick hwnd,20+j*16,60+i*16 End If Next Next VBSEnd 有没有发现代码居然 比上一章的简单,没 错,对消息来说,只需 要知道给出这个控件偏 移的x,y然后点击就可以 了。 最后说一下,扫雷只 有一个窗口,而且带有 游戏性,这也是为什么 我拿扫雷做例子的原 因:)循环找图找坐标详细教程(供新手学习)拜读了LZ的贴以后深感 LZ的无私奉献把这么核 心的能发出来,我总结上 贴把LZ的所发的精简写 成源码发出来!图的部分 大家自己抓 [General] Description=我的脚本 BeginHotkey=121 BeginHotkeyMod=0 PauseHotkey=0 PauseHotkeyMod=0 StopHotkey=123 StopHotkeyMod=0 RunOnce=1 EnableWindow= Enable=1 AutoRun=0 [Repeat] Type=0 Number=1 [Relative] SetupOCXFile= [Comment] Content= 图片自己加好了[Script] VBS dim s(4),t, x1, y1 VBS s(0)=&0&:s(1)=&1&:s(2 )=&2&:s(3)=&3&:s(4)=& k& VBS t=0 Rem 1 If t&4 Else ? ? VBSCall FindPic(0,0,650,502,& Attachment:\&&s(t)&&. bmp&,0.8,x1,y1) ? ? If x1&0 and y1&0 ? ? Else ? ?? ??? [url=file://\\Message Box]\\MessageBox[/url ] t ? ?? ???VBS t=t+1 ? ?? ???Goto 1 ? ? EndIf EndIf《蜀门》辅助 脚本源码//现在发一个目前很红的 游戏《蜀门》辅助脚本 源码,纯颜色版无封号危 险,功能很简单,不过 简单游上跟这个差不多 的也要5块一星期。 //使用时到按键精灵官方 网下载个按键精灵安 装,打开,新建个脚 本,选源文件,把源码 帖在里面就好了。在右 边下方有设置选项。 Delay 64 Plugin ckjb=Window.Foreground( ) Plugin ckbk=Window.GetWindo wRect(ckjb) VBS ckbka=split(ckbk,&|&) bkx1=ckbka(0): bky1=ckbka(1): bkx2=ckbka(2): bky2=ckbka(3) Delay 64 VBS xxts=&脚本初始化, 请 稍 后....................................... .....................& Gosub 写信息 Delay 256 UserVar Hong=50 补血百 分比 UserVar lan=50 补蓝百分 比 UserVar DZ=DropList{ 打 坐:0|吃药:1}=0 低血选项 UserVar ADZ=6 打 坐 按 键(0--9) VBS ADZ=ADZ+48 UserVar HP=4 加 血 按 键 (0--9) VBS HP=HP+48 UserVar MP=5 加蓝按键 (0--9) VBS MP=MP+48 UserVar JN=1 技 能 按 键 (0--9) VBS JN=JN+48 UserVar wpgq=20e72e 怪 物光圈颜色(找物品用,光 圈特征色) UserVar nzsz=DropList{ 随 机 选 择:0|手动选择:1}=0 验证 码处理方法 Delay 256 VBSCall FindColorEx(bkx1,bky1+3 2,bkx1+100,bky1+100,&03 00df&,0,0.9,hprX,hprY) VBS hppx=Cint(hprx+hong*1.5 6): mppx=Cint(hprx+lan*1.56 ) Delay 256 Gosub HPMP Delay 64 Rem 开始主程序 Delay 100 VBSCall FindColorEx(hprX+280,hp rY4,hprX+283,hprY+4,&030 0df&,0,0.8,intX,intY) Delay 16 If intX&0 VBS xxx=1 VBS xxts=&锁 定怪 物, 开 始 攻 击....................................... ........................................... ....& Gosub 写信息 Delay 100 KeyPress JN,1 Delay 1000 Else Gosub 捡查验证 Delay 32 Gosub 找物 Delay 32 Gosub HPMP Delay 32 VBS xxx=0 KeyPress 9,1 Delay 128 EndIf Delay 64 Goto 开始主程序 Sub 打坐 Delay 1000 Rem g VBSCall FindColorEx(hprx+154,hp ry,hprx+156,hpry+18,&010 0df&,0,0.8,hpuX,hpuY) Delay 16 VBSCall FindColorEx(hprx+154,hp ry,hprx+156,hpry+18,&e08 901&,0,0.8,hptX,hptY) Delay 16 If hpuX&0 and hptx&0 Delay 200 Goto r Else Delay 800 Goto g EndIf EndIf Rem r Return 打坐 Sub 找物 VBS dim jwx(5), jwy(5) Delay 64 For 2 VBSCall FindColorEx(bkx1+100,bk y1+100,bkx2-100,bky2100,wpgq,0,0.6,WX,WY) Delay 64 EndFor If WX&0 VBS jwx(0)=0: jwy(0)=0: jwx(1)=30: jwy(1)=0: jwx(2)=-30: jwy(2)=5: jwx(3)=0: jwy(3)=30: jwx(4)=0: jwy(4)=-30 VBS cci=0 For 5 Delay 64 MoveTo jwx(cci)+WX,jwy(cci)+W Y Delay 32 VBSCall vas=GetCursorShape(0) Delay 32 If vas= VBS xxts=&发现 物 品....................................... ........................................... ...& Gosub 写信息 Delay 64 RightDown 1 Delay 16 RightUp 1 Delay 64 Goto 捡 EndIf VBS cci=cci+1 EndFor EndIf Rem 捡 Delay 512 Plugin XY = Color.FindShape(bkx1+30 0,bky1+300,bkx2200,bky2-200, &-5|0|0,3|0|0,1|0|0,1|0|0,3|0|0,5|0|0,7|0|0, 9|0|0,11|0|0,13|0|0,15|0|0,1 7|0|0,19|0|0,21|0|1,23|0|0,2 5|0|0,27|0|0,29|0|0,31|0|1,3 3|0|1,35|0|1,37|0|0,39|0|0,4 1|0|0,43|0|0,-5|2|0,-3|2|0,1|2|0,1|2|0,3|2|0,5|2|0,7|2|0, 9|2|0,11|2|0,13|2|0,15|2|0,1 7|2|1,19|2|1,21|2|1,23|2|0,2 5|2|1,27|2|1,29|2|0,31|2|0,3 3|2|0,35|2|1,37|2|1,39|2|0,4 1|2|0,43|2|0,-5|4|1,-3|4|0,1|4|1,1|4|1,3|4|0,5|4|1,7|4|1, 9|4|1,11|4|1,13|4|1,15|4|0,1 7|4|0,19|4|0,21|4|1,23|4|1,2 5|4|1,27|4|1,29|4|1,31|4|0,3 3|4|0,35|4|1,37|4|1,39|4|0,4 1|4|0,43|4|0,-5|6|0,-3|6|0,1|6|0,1|6|0,3|6|0,5|6|0,7|6|0, 9|6|1,11|6|1,13|6|0,15|6|0,1 7|6|1,19|6|1,21|6|1,23|6|0,2 5|6|1,27|6|1,29|6|0,31|6|0,3 3|6|0,35|6|1,37|6|1,39|6|1,4 1|6|0,43|6|0,-5|8|0,-3|8|0,1|8|0,1|8|0,3|8|0,5|8|0,7|8|0, 9|8|0,11|8|0,13|8|0,15|8|1,1 MyArray = Split(XY, &|&) OKX = Clng(MyArray(0)): OKY = Clng(MyArray(1)) Delay 64 If OKX&0 Delay 64 MoveTo OKX,OKY Delay 64 LeftClick 1 EndIf Delay 64 Return 找物 Sub HPMP VBSCall FindColorEx(hppx,hpry,hp px+1,hpry+8,&01006e&,0,0 .7,hpcX,hpcY) If hpcX&0 Delay 128 Else If DZ=0 VBS xxts=&血 太 少 , 打 坐 吧....................................... ........................................... ........................& Gosub 写信息 Delay 512 KeyPress ADZ,1 Gosub 打坐 Else KeyPress HP,1 Delay 128 EndIf EndIf VBSCall FindColorEx(hppx,hpry+1 0,hppx+1,hpry+18,&6d410 0&,0,0.7,mpcX,mpcY) If mpcX&0 Delay 128 Else If DZ=0 VBS xxts=&蓝 太 少 , 打 坐....................................... ........................................... ....................& Gosub 写信息 Delay 512 KeyPress ADZ,1 Gosub 打坐 Else KeyPress MP,1 Delay 128 EndIf EndIf Return HPMP Sub 写信息 Delay 64 Plugin Msg.ShowScrTXT(bkx1+3 00,bky1+4,bkx1+800,bky1 +22,xxts,&0000ff&) Delay 64 Return 写信息 Sub 移动一下 MoveTo (bkx2bkx1)/2+100,(bky2bky1)/2+100 Delay 128 LeftClick 1 Delay 128 Return 移动一下 Sub 捡查验证 Delay 16 Plugin XY = Color.FindShape(bkx1, bky1+150, bkx2, bky2150, &0|0|1,2|0|1,4|0|1,6|0|1,8|0|1 ,10|0|0,12|0|0,14|0|0,16|0|1, 18|0|0,20|0|0,22|0|0,24|0|0, 26|0|0,28|0|0,30|0|1,32|0|0, 34|0|0,36|0|0,38|0|1,40|0|1, 42|0|1,44|0|0,0|2|1,2|2|1,4|2| 1,6|2|1,8|2|0,10|2|0,12|2|1,1 4|2|1,16|2|1,18|2|1,20|2|1,2 2|2|0,24|2|0,26|2|1,28|2|1,3 0|2|0,32|2|0,34|2|0,36|2|0,3 8|2|1,40|2|0,42|2|1,44|2|0,0| 4|1,2|4|0,4|4|1,6|4|0,8|4|0,1 0|4|0,12|4|1,14|4|0,16|4|1,1 8|4|0,20|4|1,22|4|0,24|4|0,2 6|4|0,28|4|1,30|4|0,32|4|1,3 4|4|0,36|4|0,38|4|1,40|4|0,4 2|4|1,44|4|0,0|6|1,2|6|1,4|6|1 ,6|6|1,8|6|0,10|6|0,12|6|1,14 |6|1,16|6|1,18|6|1,20|6|1,22| 6|0,24|6|1,26|6|0,28|6|1,30| 6|0,32|6|0,34|6|0,36|6|0,38| 6|1,40|6|0,42|6|1,44|6|0,0|8| 1,2|8|0,4|8|1,6|8|0,8|8|0,10| 8|0,12|8|0,14|8|0,16|8|1,18| 8|0,20|8|0,22|8|0,24|8|0,26| 8|1,28|8|1,30|8|0,32|8|0,34| 8|0,36|8|0,38|8|0,40|8|0,42| VBS ccca = Split(XY, &|&) VBS Clng(ccca(0)): Clng(ccca(1)) Delay 16 If nzco&0 If nzsz=0nzco nzcv= =VBS xxts=&出现验 证码,你定义了随机选择, 选 择 失 败 请 等 10 分 钟....................................& Gosub 写信息 Delay 16 Gosub 随机选择 ElseIf nzsz=1 VBS xxts=&出现验 证码,你定义了手动处 理 ,15 秒 后 按 任 意 键 继 续........................& Gosub 写信息 Delay 16 For 7 KeyPress JN,1 Delay 1000 KeyPress JN,1 Delay 1000 EndFor WaitKey EndIf EndIf Return 捡查验证 Sub 随机选择 Delay 32 Randomize VBS szmjg = Int((999 * Rnd) + 1) Delay 32 Plugin XY = Color.FindShape(bkx1, bky1+150, bkx2, bky2150, &0|0|1,2|0|1,4|0|1,6|0|1,8|0|1 ,10|0|0,12|0|0,14|0|0,16|0|1, 18|0|0,20|0|0,22|0|0,24|0|0, 26|0|0,28|0|0,30|0|1,32|0|0, 34|0|0,36|0|0,38|0|1,40|0|1, 42|0|1,44|0|0,0|2|1,2|2|1,4|2| 1,6|2|1,8|2|0,10|2|0,12|2|1,1 4|2|1,16|2|1,18|2|1,20|2|1,2 2|2|0,24|2|0,26|2|1,28|2|1,3 0|2|0,32|2|0,34|2|0,36|2|0,3 8|2|1,40|2|0,42|2|1,44|2|0,0| 4|1,2|4|0,4|4|1,6|4|0,8|4|0,1 0|4|0,12|4|1,14|4|0,16|4|1,1 8|4|0,20|4|1,22|4|0,24|4|0,2 6|4|0,28|4|1,30|4|0,32|4|1,3 4|4|0,36|4|0,38|4|1,40|4|0,4 2|4|1,44|4|0,0|6|1,2|6|1,4|6|1 ,6|6|1,8|6|0,10|6|0,12|6|1,14 |6|1,16|6|1,18|6|1,20|6|1,22| 6|0,24|6|1,26|6|0,28|6|1,30| 6|0,32|6|0,34|6|0,36|6|0,38| 6|1,40|6|0,42|6|1,44|6|0,0|8| 1,2|8|0,4|8|1,6|8|0,8|8|0,10| 8|0,12|8|0,14|8|0,16|8|1,18| 8|0,20|8|0,22|8|0,24|8|0,26| 8|1,28|8|1,30|8|0,32|8|0,34| 8|0,36|8|0,38|8|0,40|8|0,42| VBS MyArray = Split(XY, &|&) VBS Xznm = Clng(MyArray(0)): Yznm = Clng(MyArray(1)) Delay 32 If Xznm&0 If szmjg&0 and szmjg&250 VBS abcx=Xznm+10: abcy=Yznm+75 ElseIf szmjg&=250 and szmjg&500 VBS abcx=Xznm+10: abcy=Yznm+101 ElseIf szmjg&=500 and szmjg&750 VBS abcx=Xznm+10: abcy=Yznm+127 ElseIf szmjg&750 VBS abcx=Xznm+10: Yznm+153 EndIf Delay 256 MoveTo abcx,abcy Delay 32 LeftClick 1 Delay 256 MoveTo Xznm+154,Yznm+180 Delay 32 LeftClick 1 Delay 512 Plugin XY = Color.FindShape(bkx1, bky1+100, bkx2, bky2100, &0|0|1,2|0|1,4|0|1,6|0|1,8|0|1 ,10|0|0,12|0|0,14|0|0,16|0|1, 18|0|0,20|0|0,22|0|0,24|0|1, 26|0|1,28|0|1,30|0|1,32|0|0, 34|0|0,36|0|0,38|0|0,40|0|1, 42|0|0,44|0|1,46|0|0,48|0|1, 50|0|0,52|0|0,54|0|0,56|0|1, 58|0|0,60|0|1,62|0|0,64|0|0, 66|0|0,68|0|0,70|0|0,72|0|0, 74|0|0,76|0|0,78|0|0,80|0|0, 82|0|0,84|0|0,86|0|0,88|0|1, 90|0|1,92|0|1,0|2|1,2|2|0,4|2| 1,6|2|0,8|2|1,10|2|0,12|2|0,1 4|2|0,16|2|1,18|2|0,20|2|0,2 2|2|0,24|2|1,26|2|1,28|2|0,3 0|2|1,32|2|0,34|2|0,36|2|0,3 8|2|1,40|2|1,42|2|1,44|2|0,4 6|2|0,48|2|1,50|2|1,52|2|0,5 4|2|1,56|2|1,58|2|0,60|2|0,6 2|2|0,64|2|0,66|2|0,68|2|0,7 0|2|0,72|2|1,74|2|0,76|2|0,7 8|2|0,80|2|0,82|2|0,84|2|1,8 6|2|0,88|2|1,90|2|1,92|2|1,0| 4|1,2|4|0,4|4|1,6|4|0,8|4|1,1 0|4|0,12|4|0,14|4|0,16|4|1,1 8|4|0,20|4|0,22|4|0,24|4|1,2 6|4|1,28|4|0,30|4|1,32|4|0,3 VBS MyArray = Split(XY, &|&) VBS BBX = Clng(MyArray(0)): BBY = Clng(MyArray(1)) Delay 32 If BBX&0 xxts=&验证码选择 失 败 , 等 待 10 分 钟....................................... ..............& Gosub 写信息 Delay 128 Gosub 等待 EndIf EndIf Return 随机选择 Sub 等待 VBS tt4=now Rem ddsj If datediff(&s&,tt4,now)&=600 Delay 512 Goto ddw Else Delay 512 Gosub HPMP Delay 128 Goto ddsj EndIf Rem ddw Return 等待游戏找 怪 的思路方法(按键精灵脚本技术)很多朋友都不知道如何在游戏中用按键精灵 找怪物 z&LY0QF& 请看下面哦 VX]9 O 对一些找怪的思路小有体会。简单来说找怪就是找怪与背景不同的独有的特征,可以通过找怪的颜色/图片、怪名字颜色/图片、怪血 +J[1]ql/^1。区域找色 应该说是最简单的找怪方法了,在区域里查找怪的特有颜色、名字颜色、血条颜色、怪的阴影等等。如果找到移动鼠标 `o8@o 例子(区域模糊找色): DV EF -\4V[(: + VBSCall FindColorEx(0,0,,\&FFFFFF\&,1,0.8,x,y) -A4 j L:@ If x&=0 and y&=0 9{;KgkQq;\ //如果找到颜色(通过判断坐标变量是否在区域内就可以知道有没有找到目标) 9 7B//区域模糊找色,0,0,为区域范围,\&FFFFFF\&为颜色,1为查找方式(中间向外),0.8为模糊值,x,y为找色后储存坐标的变量Mo MoveTo x y J; [1] [1]g80 Delay 50 = ^zV//把鼠标移动到该色的坐标(如果找的是怪名字或血条,可能移动不到怪身上,这时就要用鼠标偏移如:MoveTo x+10 y+10) 03U(q //延时 9qge ] 7 LeftClick 1 o:tpgBv`; //左键单击进行攻击 _Uu kOJv92 EndIf 4f WJG //条件结束 sm~CJ Ca F7 R& |M! 用数组区域查找多色:点击查看 k8E xd/4 -{)qW=?Tz& 注: z?yj8o; `n ①。区域范围的定位: 'f~2z ic ②。很多朋友对最后两个坐标变量x,y不太了解,在这里通俗的解释一下: anPS\q06% Ne7{R&]#区域范围指的是被搜索区域的范围,这4个参数分别指的是区域的左,上,右,下。简单的说就是取区域的左上角x,y坐标和右下角的x,y坐顾名思义,这两个变量是用来贮存找色或找图后的坐标。当找到目标后,把目标所在的坐标位置贮存到这两个变量里,然后可以通过2。区域找图 在区域里查找怪的图形、怪的名字图片、血条图片等等。语法与区域找色相似,需要注意的是图片的处理,这里有两个 l, s9MhCGi 例子(区域找图): wlr/vp(_\ BTn buVwH VBSCall FindPic(0,0,,\&1.bmp\&,0.9,x,y) w(dJ If x&=0 and y&=0 9w{v6,4 //如果坐标在区域内(找到图片) I2,[ 0TP# MoveTo x y u-gsC? N+8 //移动到图片位置(图片左上角) 3 rc95F? {L3L //区域找图,0,0,为区域范围,\&1.bmp\&为图片名(路径),0.9为找图的相似度,x,y为找图后储存坐标的变量 Xs A .B\图片做好后可以放在按键文件夹里的script文件夹中,就可以不用在脚本里写图片路径,只需图片名就行了,写脚本的时候比较方便 Delay 502B x02E//延时 DF Pppu LeftClick 1 6|K|,_VlU //左键单击 =jvi7:9x EndIf ^kNjMI\|k //条件结束 h0Z;& }3 'zG=em?A BV,u F~0{G 3。圆形渐开线扫描找怪法 效率较低,这里有个较完整的例子可以参考一下mzpKGsF i$WV&'i9 z _&aJ3u 4。圆形渐开线扫描找变色怪 效率较低,下面是我以前收集的一个找变色怪的例子。 0hD_si&VBS dim x0,n,y0,x,color0,color co/a!\86G //声明变量 ]9xN[1]uL9 Rem start 2X{,W6?T //标记渐开线找怪开始 56/r9$RSC VBS x0=400:n=1:y0=300:x=400 HBmut(2I //变量初始化 IE)|q3Dy+ While x&800 AL0qt&D //限定横坐标范围不超过800 1}yUj~IL N VBS x=x0+4*(cos(n)+n*sin(n)) t0+b TpNZ //根据渐开线公式计算下一个点的横坐标并赋值给x p&8Kdm,& VBS y=y0+3*(sin(n)-n*cos(n)) J V}[1]@o //根据渐开线公式计算下一个点的纵坐标并赋值给y Nx,kgt 0+D VBSCall color0=GetPixelColor(x,y) &(2h&lrm //在鼠标移动之前,获取目标点色值并赋值给color0 M}=]+SPd/ VBSCall Call SetCursorPos(x,y) 9&:ZG^' //马上移动鼠标到目标点 N- jfVBSCall color=GetPixelColor(x,y) 4VMe5CE9 //获取鼠标移动后该点色值并赋值给color hF]+ `BIf color&&color0 % .+Z# //同一点取得的两次色值比较,不同,则执行以下的打怪脚本 p$%]9^. ~ LeftClick 1 7Xpdo#oA/ //左键单击 &UP2HpRR Delay 3000 L& ~O#&Q] //打怪延时 62i&Pj&jWl EndIf #By GobO% //该点判断结束 F|&+ dBoQN Delay 10 :]u x]tG(# //循环延时 ]2 Ek&A VBS n=n+0.2 i&l} !0 //渐开线参数增量,其中0.2代表点间距,数值越小,渐开线散开点间距越小 !c q 5 EndFor q/,?18{\ //一次渐开线取点判断结束 zFq&Zb Goto start c&Y_BosK //跳转到开始,重复渐开线搜索 $ [s%|x'7 n LLo# 5。小地图找怪 公式:大地图怪坐标 = (小地图怪坐标 - 小地图人物坐标) * 比例 + 大地图人物坐标 (0NY}U`8 [1] .ZF&Pg! m f!比例是(大地图怪坐标和大地图人物坐标之间的距离)与(小地图怪坐标和小地图人物坐标之间的距离)这两者的比例。如下图 A线 下载 (340.32 KB) 4%m?uY%9 yi ThQcd@
18:34 y} -& ) =8 例子(小地图找怪): MhAed gA_ R x\ m^2 VBSCall FindCenterColor(858,66,996,192,\&0000FF\&,x,y) &SU-WNfH| //区域从中间向外找色,858,66,996,192是小地图的区域范围 If x&=0 and y&=0 PcBAL%DM //如果找到颜色 & @V^4?L^ x0=(x-926)*10+512 *k@C4)SsP{ y0=(y-129)*10+389 z4Q5=[-#J( //计算大地图怪的坐标 \P& 9 MoveTo x0 y0 74tCg?[1]e //移动到大地图怪的坐标 Ayn3#: J Delay 50 y% ?vG{]W~ //延时 :@ -yDz% LeftClick 1 Sk Lv3d! //左键单击进行攻击 fxg Ri % uOYFG然后用区域找色查找小地图上怪的小点(最好用从区域中心向外找色),找到怪的小点后再计算坐标,计算得出大地图坐标后,移动 h EndIf f3J! c){ //条件结束 ZZ5o0+}&L ;X&Atv &P /iA 4x8e 特别注意:移动到怪位置后用“鼠标特征码比对”可有效提高找怪的准确性。(可用于所有找怪方式内) Zge m`* / v*cB yj*=i 我暂时就写这几个了,当然找怪的方法不止这几种而已,欢迎大家一起来独立团讨论与分享~! 学习教程令(2~5页) 令(5~13页) 令(13~22页) 令(22~28页) (28~355页) 例(35~最后)GetLastKey 检测上次按键检测上次按键 参数1 整数型,可选:变量名 无复制代码1. 2. 3. 4. 5. //脚本运行到这一行不会暂停,调用的时候立即返回,得到调用之前最后一次按下的按键码保存在变量Key里。 Key=GetLastKey() If Key = 13 Then Msgbox &你上次按下了回车键& End If//脚本运行到这一行不会暂停,调用的时候立即返回,得到调用之前最后一次按下的按键码 保存在变量Key里。 Key=GetLastKey() If Key = 13 Then Msgbox &你上次按下了回车键& End If 复制代码1. 2. 3. 4. 5. //脚本运行到这一行不会暂停,调用的时候立即返回,得到调用之前最后一次按下的按键码保存在变量Key里。 GetLastKey Key If Key = 13 Msgbox &你上次按下了回车键& EndIf//脚本运行到这一行不会暂停,调用的时候立即返回,得到调用之前最后一次按下的按键码 保存在变量Key里。 GetLastKey Key If Key = 13 Msgbox &你上次按下了回车键& EndIfKeyDown 按住键盘按住 参数1 整数型,键盘虚拟码(8.X支持 按键字符) 参数2 整数型,次数 无复制代码1. 2. 用 3. 4. 5. 6. 7. 8. KeyDown &A&,1 //上面的支持按键字符,语句表示按住A键1次 //KeyDown、KeyDownS、KeyDownH //KeyDownS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要求,PS2(圆口)和USB接口的键盘都可以使 //KeyDownH: 硬件模拟方式,仅支持PS(圆口)的键盘 点击查看使用硬件模拟方式的注意事项 KeyDown 65,1 //65是A键的按键码,上面的语句表示按住A键1次//KeyDown、KeyDownS、KeyDownH //KeyDownS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要求,PS2(圆口)和USB接 口的键盘都可以使用 //KeyDownH: 硬件模拟方式,仅支持PS(圆口)的键盘 点击查看使用硬件模拟方式的注意事项 KeyDown 65,1 //65是A键的按键码,上面的语句表示按住A键1次 KeyDown &A&,1 //上面的支持按键字符,语句表示按住A键1次 复制代码1. 2. 用 3. 4. 5. //KeyDown、KeyDownS、KeyDownH //KeyDownS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要求,PS2(圆口)和USB接口的键盘都可以使 //KeyDownH: 硬件模拟方式,仅支持PS(圆口)的键盘 点击查看使用硬件模拟方式的注意事项 KeyDown 65,1 //65是A键的按键码,上面的语句表示按住A键1次KeyPress 按键键盘按键 参数1 整数型,键盘虚拟码(8.X支持 按键字符) 参数2 整数型,次数 无复制代码1. //KeyPress、KeyPressS、KeyPressH 2. //KeyPressS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要求,PS2(圆口)和USB接口的键盘都可以 使用 3. //KeyPressH: 硬件模拟方式,仅支持PS(圆口)的键盘 点击查看使用硬件模拟方式的注意事项 4. 5. 6. 7. KeyPress &A&,1 KeyPress 65,1 //65是A键的按键码,上面的语句表示按A键1次 8.//上面的支持按键字符,语句表示按A键1次//KeyPress、KeyPressS、KeyPressH //KeyPressS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要求,PS2(圆口)和USB接 口的键盘都可以使用 //KeyPressH: 硬件模拟方式,仅支持PS(圆口)的键盘 点击查看使用硬件模拟方式的注意事 KeyPress 65,1 //65是A键的按键码,上面的语句表示按A键1次 KeyPress &A&,1 //上面的支持按键字符,语句表示按A键1次 复制代码1. //KeyPress、KeyPressS、KeyPressH 2. //KeyPressS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要求,PS2(圆口)和USB接口的键盘都可以 使用 3. //KeyPressH: 硬件模拟方式,仅支持PS(圆口)的键盘 点击查看使用硬件模拟方式的注意事项 4. KeyPress 65,1 5. //65是A键的按键码,上面的语句表示按A键1次//KeyPress、KeyPressS、KeyPressH //KeyPressS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要求,PS2(圆口)和USB接 口的键盘都可以使用 //KeyPressH: 硬件模拟方式,仅支持PS(圆口)的键盘 点击查看使用硬件模拟方式的注意事 KeyPress 65,1 //65是A键的按键码,上面的语句表示按A键1次KeyUp 弹起键盘弹起 参数1 整数型,键盘虚拟码(8.X支持 按键字符) 参数2 整数型,次数 无复制代码1. 2. 3. 4. 5. 6. 7. 8. KeyUp &A&,1 //上面的支持按键字符,语句表示松开A键1次 //KeyUp、KeyUpS、KeyUpH //KeyUpS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要求,PS2(圆口)和USB接口的键盘都可以使用 //KeyUpH: 硬件模拟方式,仅支持PS(圆口)的键盘 点击查看使用硬件模拟方式的注意事项 KeyUp 65,1 //65是A键的按键码,上面的语句表示松开A键1次//KeyUp、KeyUpS、KeyUpH //KeyUpS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要求,PS2(圆口)和USB接口 的键盘都可以使用 //KeyUpH: 硬件模拟方式,仅支持PS(圆口)的键盘 点击查看使用硬件模拟方式的注意事项 KeyUp 65,1 //65是A键的按键码,上面的语句表示松开A键1次 KeyUp &A&,1 //上面的支持按键字符,语句表示松开A键1次 复制代码1. 2. 3. 4. 5. //KeyUp、KeyUpS、KeyUpH //KeyUpS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要求,PS2(圆口)和USB接口的键盘都可以使用 //KeyUpH: 硬件模拟方式,仅支持PS(圆口)的键盘 点击查看使用硬件模拟方式的注意事项 KeyUp 65,1 //65是A键的按键码,上面的语句表示松开A键1次//KeyUp、KeyUpS、KeyUpH //KeyUpS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要求,PS2(圆口)和USB接口 的键盘都可以使用 //KeyUpH: 硬件模拟方式,仅支持PS(圆口)的键盘 点击查看使用硬件模拟方式的注意事项 KeyUp 65,1 //65是A键的按键码,上面的语句表示松开A键1次WaitKey 等待按任意键等待按任意键 参数1 整数型,可选:变量名 无复制代码1. 2. 3. 4. 5. Key=WaitKey() //脚本运行到这一行会暂停,当用户按下键盘后继续执行,并且把用户的按键码保存在变量Key里 If Key = 13 Then MessageBox &恭喜你按下了回车键& End IfKey=WaitKey() //脚本运行到这一行会暂停,当用户按下键盘后继续执行,并且把用户的按键码保存在变量 Key里 If Key = 13 Then MessageBox &恭喜你按下了回车键& End If 复制代码1. 2. 3. 4. 5. WaitKey Key //脚本运行到这一行会暂停,当用户按下键盘后继续执行,并且把用户的按键码保存在变量Key里 If Key = 13 Msgbox &恭喜你按下了回车键& EndIfWaitKey Key //脚本运行到这一行会暂停,当用户按下键盘后继续执行,并且把用户的按键码保存在变量 Key里 If Key = 13 Msgbox &恭喜你按下了回车键& EndIf GetCursorPos 得到鼠标位置坐标得到当前鼠标所在的位置坐标 参数1 整数型,返回x坐标 参数2 整数型,返回y坐标 无复制代码1. 2. GetCursorPos mx,my //把当前鼠标位置的x和y坐标放在变量mx和my中GetCursorPos mx,my //把当前鼠标位置的x和y坐标放在变量mx和my中 复制代码1. 2. VBSCall GetCursorPos(mx,my) //把当前鼠标位置的x和y坐标放在变量mx和my中VBSCall GetCursorPos(mx,my) //把当前鼠标位置的x和y坐标放在变量mx和my中GetCursorShape 得到鼠标形状得到当前鼠标的形状特征 参数1 整数型,参数 整数型,鼠标的形状值复制代码1. 2. 3. 4. 5. 6. 7. 8. 9. 10. 12. 13. Else 14. MessageBox &不认识当前鼠标形状!& 15. End If //参数: 0 是6.83之前的版本默认的参数 //参数: 1 可用于一些在参数0下无法区分鼠标形状代码的情况 //下面是我们普通的WINDOWS鼠标形状特征 //不同电脑上鼠标形状特征也许不同,请使用&抓点抓色&功能抓取正确的鼠标形状特征 Shape1 =
//下面是我们访问网页超链接时候的手型鼠标形状 Shape2 =
shape=GetCursorShape(0) If shape = shape1 Then MessageBox &当前鼠标形状是普通的WINDOWS鼠标& MessageBox &当前鼠标形状是手型鼠标&11. ElseIf shape = shape2 Then//参数: 0 是6.83之前的版本默认的参数 //参数: 1 可用于一些在参数0下无法区分鼠标形状代码的情况 //下面是我们普通的WINDOWS鼠标形状特征 //不同电脑上鼠标形状特征也许不同,请使用&抓点抓色&功能抓取正确的鼠标形状特征 Shape1 =
//下面是我们访问网页超链接时候的手型鼠标形状 Shape2 =
shape=GetCursorShape(0) If shape = shape1 Then MessageBox ElseIf shape = MessageBox Else MessageBox End If 复制代码1. 2. 3. 4. 5. 6. 7. 8. 9. 10. 12. 13. Else 14.&当前鼠标形状是普通的WINDOWS鼠标& shape2 Then &当前鼠标形状是手型鼠标& &不认识当前鼠标形状!&//参数: 0 是6.83之前的版本默认的参数 //参数: 1 可用于一些在参数0下无法区分鼠标形状代码的情况 //下面是我们普通的WINDOWS鼠标形状特征 //不同电脑上鼠标形状特征也许不同,请使用&抓点抓色&功能抓取正确的鼠标形状特征 Shape1 =
//下面是我们访问网页超链接时候的手型鼠标形状 Shape2 =
VBSCall Shape=GetCursorShape(0) If shape = shape1 MessageBox 当前鼠标形状是普通的WINDOWS鼠标 MessageBox 当前鼠标形状是手型鼠标 MessageBox 不认识当前鼠标形状!11. ElseIf shape = shape215. EndIf//参数: 0 是6.83之前的版本默认的参数 //参数: 1 可用于一些在参数0下无法区分鼠标形状代码的情况 //下面是我们普通的WINDOWS鼠标形状特征 //不同电脑上鼠标形状特征也许不同,请使用&抓点抓色&功能抓取正确的鼠标形状特征 Shape1 =
//下面是我们访问网页超链接时候的手型鼠标形状 Shape2 =
VBSCall Shape=GetCursorShape(0) If shape = shape1 MessageBox 当前鼠标形状是普通的WINDOWS鼠标 ElseIf shape = shape2 MessageBox 当前鼠标形状是手型鼠标 Else MessageBox 不认识当前鼠标形状! EndIfGetLastClick 检测上次按过的鼠标键检测上一次按下的鼠标代码 参数1 整数型,可选:变量名 无复制代码1. 2. 3. 4. Mouse=GetLastClick() If Mouse =32770 Or Mouse =32769 Then Msgbox &你按下了鼠标左键& End If Mouse=GetLastClick() If Mouse =32770 Or Mouse =32769 Then Msgbox &你按下了鼠标左键& End If 复制代码1. 2. 3. 4. GetLastClick Mouse If Mouse =32770 Or Mouse =32769 Msgbox &你按下了鼠标左键& EndIfLeftClick 左键单击模拟点击鼠标左键 参数1 整数型,次数 无复制代码1. //LeftClick、LeftClickS、LeftClickH 2. //LeftClickS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要求,PS2(圆口)和USB接口的鼠标都可以 使用 3. //LeftClickH: 硬件模拟方式,仅支持PS(圆口)的鼠标 点击查看使用硬件模拟方式的注意事项 4. LeftClick 5 5. //在当前鼠标的位置单击鼠标左键5次//LeftClick、LeftClickS、LeftClickH //LeftClickS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要求,PS2(圆口)和USB 接口的鼠标都可以使用 //LeftClickH: 硬件模拟方式,仅支持PS(圆口)的鼠标 点击查看使用硬件模拟方式的注意事 LeftClick 5 //在当前鼠标的位置单击鼠标左键5次 复制代码1. //LeftClick、LeftClickS、LeftClickH 2. //LeftClickS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要求,PS2(圆口)和USB接口的鼠标都可以 使用 3. //LeftClickH: 硬件模拟方式,仅支持PS(圆口)的鼠标 点击查看使用硬件模拟方式的注意事项 4. LeftClick 5 5. //在当前鼠标的位置单击鼠标左键5次//LeftClick、LeftClickS、LeftClickH //LeftClickS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要求,PS2(圆口)和USB 接口的鼠标都可以使用 //LeftClickH: 硬件模拟方式,仅支持PS(圆口)的鼠标 点击查看使用硬件模拟方式的注意事 LeftClick 5 //在当前鼠标的位置单击鼠标左键5次LeftDoubleClick 左键双击模拟双击鼠标左键 参数1 整数型,次数 无复制代码1. //LeftDoubleClick、LeftDoubleClickS、LeftDoubleClickH] 2. //LeftDoubleClickS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要求,PS2(圆口)和USB接口的鼠 标都可以使用 3. //LeftDoubleClickH: 硬件模拟方式,仅支持PS(圆口)的鼠标 点击查看使用硬件模拟方式的注意事项 4. LeftDoubleClick 5 5. //在当前鼠标的位置双击鼠标左键5次//LeftDoubleClick、LeftDoubleClickS、LeftDoubleClickH] //LeftDoubleClickS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要求,PS2(圆口) 和USB接口的鼠标都可以使用 //LeftDoubleClickH: 硬件模拟方式,仅支持PS(圆口)的鼠标 点击查看使用硬件模拟方式的 注意事项 LeftDoubleClick 5 //在当前鼠标的位置双击鼠标左键5次 复制代码1. //LeftDoubleClick、LeftDoubleClickS、LeftDoubleClickH] 2. //LeftDoubleClickS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要求,PS2(圆口)和USB接口的鼠 标都可以使用 3. //LeftDoubleClickH: 硬件模拟方式,仅支持PS(圆口)的鼠标 点击查看使用硬件模拟方式的注意事项 4. 5. LeftDoubleClick 5 //在当前鼠标的位置双击鼠标左键5次//LeftDoubleClick、LeftDoubleClickS、LeftDoubleClickH] //LeftDoubleClickS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要求,PS2(圆口) 和USB接口的鼠标都可以使用 //LeftDoubleClickH: 硬件模拟方式,仅支持PS(圆口)的鼠标 点击查看使用硬件模拟方式的 注意事项 LeftDoubleClick 5 //在当前鼠标的位置双击鼠标左键5次LockMouse 锁定鼠标位置锁定鼠标位置,用户将不能通过移动鼠标而改变鼠标位置,而脚本仍可以改变鼠标位置 无 无复制代码1. 2. 3. 4. 5. Loop //在脚本开始的时候使用这个命令,可以有效防止用户误触鼠标引起脚本执行出错 LockMouse Do Delay 1000//在脚本开始的时候使用这个命令,可以有效防止用户误触鼠标引起脚本执行出错 LockMouse Do Delay 1000 Loop 复制代码1. 2. 3. 4. 5. //在脚本开始的时候使用这个命令,可以有效防止用户误触鼠标引起脚本执行出错 LockMouse While True Delay 1000 EndWhile MiddleClick 中键单击模拟点击鼠标中键 参数1 整数型,次数 无复制代码1. //MiddleClick、MiddleClickS、MiddleClickH 2. //MiddleClickS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要求,PS2(圆口)和USB接口的鼠标都可 以使用 3. //MiddleClickH: 硬件模拟方式,仅支持PS(圆口)的鼠标 点击查看使用硬件模拟方式的注意事项 4. 5. MiddleClick 5 //在当前鼠标的位置单击鼠标中键5次//MiddleClick、MiddleClickS、MiddleClickH //MiddleClickS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要求,PS2(圆口)和 USB接口的鼠标都可以使用 //MiddleClickH: 硬件模拟方式,仅支持PS(圆口)的鼠标 点击查看使用硬件模拟方式的注意 事项 MiddleClick 5 //在当前鼠标的位置单击鼠标中键5次 复制代码1. //MiddleClick、MiddleClickS、MiddleClickH 2. //MiddleClickS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要求,PS2(圆口)和USB接口的鼠标都可 以使用 3. //MiddleClickH: 硬件模拟方式,仅支持PS(圆口)的鼠标 点击查看使用硬件模拟方式的注意事项 4. 5. MiddleClick 5 //在当前鼠标的位置单击鼠标中键5次MouseWheel 鼠标滚轮滚动鼠标滚轮 参数1 整数型,滚动量 无复制代码1. 2. 3. 4. //如果滚动量为正,向上滚动;否则向下滚动. //仅支持Windows 2000以上的操作系统. MouseWheel 1 //把鼠标滚轮向上滚动1格//如果滚动量为正,向上滚动;否则向下滚动. //仅支持Windows 2000以上的操作系统. MouseWheel 1 //把鼠标滚轮向上滚动1格 复制代码1. 2. 3. 4. //如果滚动量为正,向上滚动;否则向下滚动. //仅支持Windows 2000以上的操作系统. MouseWheel 1 //把鼠标滚轮向上滚动1格MoveR 鼠标相对移动鼠标相对移动到 参数1 整数型,X距离 参数2 整数型,Y距离 无复制代码1. 2. 3. 4. 5. 6. 7. //MoveR、MoveRS、MoveRH //MoveRS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要求,PS2(圆口)和USB接口的鼠标都可以使用 //MoveRH: 硬件模拟方式,仅支持PS(圆口)的鼠标 点击查看使用硬件模拟方式的注意事项 //当前鼠标在(100,100)点,使用下面语句 MoveR 200,300 //之后,鼠标就被移到了(100+200,100+300)处,也就是坐标(300,400)处 //提示:使用硬件模拟方式不能碰键盘鼠标,否则会导致出错//MoveR、MoveRS、MoveRH //MoveRS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要求,PS2(圆口)和USB接口 的鼠标都可以使用 //MoveRH: 硬件模拟方式,仅支持PS(圆口)的鼠标 点击查看使用硬件模拟方式的注意事项 //当前鼠标在(100,100)点,使用下面语句 MoveR 200,300 //之后,鼠标就被移到了(100+200,100+300)处,也就是坐标(300,400)处 //提示:使用硬件模拟方式不能碰键盘鼠标,否则会导致出错 复制代码1. 2. 3. 4. 5. 6. 7. //MoveR、MoveRS、MoveRH //MoveRS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要求,PS2(圆口)和USB接口的鼠标都可以使用 //MoveRH: 硬件模拟方式,仅支持PS(圆口)的鼠标 点击查看使用硬件模拟方式的注意事项 //当前鼠标在(100,100)点,使用下面语句 MoveR 200,300 //之后,鼠标就被移到了(100+200,100+300)处,也就是坐标(300,400)处 //提示:使用硬件模拟方式不能碰键盘鼠标,否则会导致出错//MoveR、MoveRS、MoveRH //MoveRS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要求,PS2(圆口)和USB接口 的鼠标都可以使用 //MoveRH: 硬件模拟方式,仅支持PS(圆口)的鼠标 点击查看使用硬件模拟方式的注意事项 //当前鼠标在(100,100)点,使用下面语句 MoveR 200,300 //之后,鼠标就被移到了(100+200,100+300)处,也就是坐标(300,400)处 //提示:使用硬件模拟方式不能碰键盘鼠标,否则会导致出错MoveTo 鼠标移动移动鼠标到 参数1 整数型,X坐标 参数2 整数型,Y坐标 无复制代码1. 2. 3. 4. 5. //MoveTo、MoveToS、MoveToH //MoveToS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要求,PS2(圆口)和USB接口的鼠标都可以使用 //MoveToH: 硬件模拟方式,仅支持PS(圆口)的鼠标 MoveTo 100,200 //把鼠标移动到(100,200)这个点上 6. 7. 8. 9.intX=50 intY=150 MoveTo intX,intY //把鼠标移动到(intX,intY)这个点上,需要5.50以上版本支持.//MoveTo、MoveToS、MoveToH //MoveToS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要求,PS2(圆口)和USB接口 的鼠标都可以使用 //MoveToH: 硬件模拟方式,仅支持PS(圆口)的鼠标 MoveTo 100,200 //把鼠标移动到(100,200)这个点上 intX=50 intY=150 MoveTo intX,intY //把鼠标移动到(intX,intY)这个点上,需要5.50以上版本支持. 复制代码1. 2. 3. 4. 5. 6. 7. 8. 9. //MoveTo、MoveToS、MoveToH //MoveToS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要求,PS2(圆口)和USB接口的鼠标都可以使用 //MoveToH: 硬件模拟方式,仅支持PS(圆口)的鼠标 MoveTo 100,200 //把鼠标移动到(100,200)这个点上 intX=50 intY=150 MoveTo intX,intY //把鼠标移动到(intX,intY)这个点上,需要5.50以上版本支持.RestoreMousePos 恢复上次保存的鼠标位置保存当前鼠标位置 无 无复制代码1. 2. 3. 4. 5. 6. 7. 8. 9. SaveMousePos //保存当前鼠标位置 Delay 100 MoveTo 500,20 Delay 100 RestoreMousePos //将鼠标移动到上一次保存的鼠标位置 //保存/恢复鼠标位置常用于制作网络游戏练功脚本,脚本开始时保存鼠标位置,脚本结束时恢复鼠标位置, //这样脚本执行后鼠标的位置就不会变化SaveMousePos //保存当前鼠标位置 Delay 100 MoveTo 500,20 Delay 100 RestoreMousePos //将鼠标移动到上一次保存的鼠标位置 //保存/恢复鼠标位置常用于制作网络游戏练功脚本,脚本开始时保存鼠标位置,脚本结束时 恢复鼠标位置, //这样脚本执行后鼠标的位置就不会变化 复制代码1. 2. 3. 4. 5. 6. 7. 8. 9. SaveMousePos //保存当前鼠标位置 Delay 100 MoveTo 500,20 Delay 100 RestoreMousePos //将鼠标移动到上一次保存的鼠标位置 //保存/恢复鼠标位置常用于制作网络游戏练功脚本,脚本开始时保存鼠标位置,脚本结束时恢复鼠标位置, 这样脚本执行后鼠标的位置就不会变化SaveMousePos //保存当前鼠标位置 Delay 100 MoveTo 500,20 Delay 100 RestoreMousePos //将鼠标移动到上一次保存的鼠标位置 //保存/恢复鼠标位置常用于制作网络游戏练功脚本,脚本开始时保存鼠标位置,脚本结束时 恢复鼠标位置, 这样脚本执行后鼠标的位置就不会变化RightClick 右键单击模拟点击鼠标右键 参数1 整数型,次数 无复制代码1. //RightClick、RightClickS、RightClickH 2. //RightClickS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要求,PS2(圆口)和USB接口的鼠标都可 以使用 3. //RightClickH: 硬件模拟方式,仅支持PS(圆口)的鼠标 点击查看使用硬件模拟方式的注意事项 4. 5. RightClick 5 //在当前鼠标的位置单击鼠标右键5次//RightClick、RightClickS、RightClickH //RightClickS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要求,PS2(圆口)和USB 接口的鼠标都可以使用 //RightClickH: 硬件模拟方式,仅支持PS(圆口)的鼠标 点击查看使用硬件模拟方式的注意 事项 RightClick 5 //在当前鼠标的位置单击鼠标右键5次 复制代码1. //RightClick、RightClickS、RightClickH 2. //RightClickS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要求,PS2(圆口)和USB接口的鼠标都可 以使用 3. //RightClickH: 硬件模拟方式,仅支持PS(圆口)的鼠标 点击查看使用硬件模拟方式的注意事项 4. RightClick 5 5.//在当前鼠标的位置单击鼠标右键5次//RightClick、RightClickS、RightClickH //RightClickS: 超级模拟方式,兼容性更强,对键盘和鼠标没有特别的要求,PS2(圆口)和USB 接口的鼠标都可以使用 //RightClickH: 硬件模拟方式,仅支持PS(圆口)的鼠标 点击查看使用硬件模拟方式的注意 事项 RightClick 5 //在当前鼠标的位置单击鼠标右键5次SaveMousePos 保存当前鼠标所在位置保存当前鼠标位置 无 无复制代码1. 2. 3. 4. 5. 6. 7. 8. 9. SaveMousePos //保存当前鼠标位置 Delay 100 MoveTo 500,20 Delay 100 RestoreMousePos //将鼠标移动到上一次保存的鼠标位置 //保存/恢复鼠标位置常用于制作网络游戏练功脚本,脚本开始时保存鼠标位置,脚本结束时恢复鼠标位置, //这样脚本执行后鼠标的位置就不会变化SaveMousePos //保存当前鼠标位置 Delay 100 MoveTo 500,20 Delay 100 RestoreMousePos //将鼠标移动到上一次保存的鼠标位置 //保存/恢复鼠标位置常用于制作网络游戏练功脚本,脚本开始时保存鼠标位置,脚本结束时 恢复鼠标位置, //这样脚本执行后鼠标的位置就不会变化 复制代码1. 2. 3. 4. 5. 6. 7. 8. 9. SaveMousePos //保存当前鼠标位置 Delay 100 MoveTo 500,20 Delay 100 RestoreMousePos //将鼠标移动到上一次保存的鼠标位置 //保存/恢复鼠标位置常用于制作网络游戏练功脚本,脚本开始时保存鼠标位置,脚本结束时恢复鼠标位置, 这样脚本执行后鼠标的位置就不会变化SaveMousePos //保存当前鼠标位置 Delay 100 MoveTo 500,20 Delay 100 RestoreMousePos //将鼠标移动到上一次保存的鼠标位置 //保存/恢复鼠标位置常用于制作网络游戏练功脚本,脚本开始时保存鼠标位置,脚本结束时 恢复鼠标位置, 这样脚本执行后鼠标的位置就不会变化UnlockMouse 解除锁定鼠标位置解除LockMouse命令对鼠标位置的锁定 无 无复制代码1.复制代码1. 2. //如果用户使用了LockMouse命令而没有使用UnlockMouse命令,按键精灵会在脚本结束时自动解除锁定 UnlockMouse//如果用户使用了LockMouse命令而没有使用UnlockMouse命令,按键精灵会在脚本结束时自 动解除锁定 UnlockMouseWaitClick 按任意鼠标键继续脚本执行到这一句暂停,按下任意鼠标键之后继续 参数1 整数型,可选:变量名 无复制代码1. 2. last_click=WaitClick() MessageBox &您按下了& & last_clicklast_click=WaitClick() MessageBox &您按下了& & last_click 复制代码1. 2. WaitClick last_click MessageBox &您按下了& & last_clickWaitClick last_click MessageBox &您按下了& & last_clickCall 调用过程调用过程 参数1 字符串型,过程名 无复制代码1. 2. 3. 4. 5. 6. Call 子程序(&我是子程序,被你调用了&) EndScript //支持中文名变量 Sub 子程序(啊) Msgbox 啊 End Sub 7.//定义一个过程,可以在脚本中调用这个过程Call 子程序(&我是子程序,被你调用了&) EndScript //支持中文名变量 Sub 子程序(啊) Msgbox 啊 End Sub //定义一个过程,可以在脚本中调用这个过程 复制代码Do 循环条件循环 参数1 条件型,循环条件 无复制代码1. 2. 3. 4. 5. 6. 7. 8. 9. 10. 例子2: 11. i=0 12. Do Until i=0 13. 14. Loop 15. Msgbox &循环结束& 16. //当循环条件成立的时候,离开循环体 17. 18. 19. 例子3: 20. i=0 21. Do Until i=1 22. 23. Loop 24. //当循环条件不成立的时候,反复执行循环体 25. 26. 27. 例子4: 28. n=0 29. Do While true 30. 31. Msgbox &我将循环10次停下来!!& If n&=10 Then Msgbox &我停不下来啦!!快住手& Msgbox &为什么没有循环到我呢?& Loop //当循环条件成立的时候,反复执行循环体 例子1: //支持Exit Do 命令退出循环 i=0 Do While i=0 Msgbox &我停不下来啦!!快住手& 32. 33. 34. 35. 36. Loop//当循环条件成立的时候,离开循环体 Exit do End if n=n+137. Msgbox n & &次& 38. 39. 40. 例子5: 41. i = 0 42. Do 43. MessageBox &ok& 44. Loop While i && 0 45. //条件放后面,前面的循环内容可以执行一次!例子1: //支持Exit Do 命令退出循环 i=0 Do While i=0 Msgbox &我停不下来啦!!快住手& Loop //当循环条件成立的时候,反复执行循环体例子2: i=0 Do Until i=0 Msgbox &为什么没有循环到我呢?& Loop Msgbox &循环结束& //当循环条件成立的时候,离开循环体例子3: i=0 Do Until i=1 Msgbox &我停不下来啦!!快住手& Loop //当循环条件不成立的时候,反复执行循环体例子4: n=0 Do While true Msgbox &我将循环10次停下来!!& If n&=10 Then //当循环条件成立的时候,离开循环体 Exit do End if n=n+1 Loop Msgbox n & &次&例子5: i = 0 Do MessageBox &ok& Loop While i && 0 //条件放后面,前面的循环内容可以执行一次! 复制代码1. 无For 循环循环一定次数 参数1 整数型,循环次数 无复制代码1. 2. 3. 4. 5. 6. 7. 8. 9. 11. 12. Next 13. //循环10次 14. 15. 16. 例子3: 17. //支持Exit For 命令退出循环 18. For i=0 to 19 step 2 19. 20. Next 21. //循环10次 22. 23. 例子4: 24. //支持Exit For 命令退出循环 25. For i=0 to 19 step 2 26. 27. Delay 100 If i&9 Then Delay 100 Next //循环10次 例子2: //支持Exit For 命令退出循环 Delay 100 例子1: //支持Exit For 命令退出循环 For i=0 To 9 Delay 10010. For 10 28. 29. 30. Next 31. //循环5次Exit For End If例子1: //支持Exit For 命令退出循环 For i=0 To 9 Delay 100 Next //循环10次 例子2: //支持Exit For 命令退出循环 For 10 Delay 100 Next //循环10次例子3: //支持Exit For 命令退出循环 For i=0 to 19 step 2 Delay 100 Next //循环10次 例子4: //支持Exit For 命令退出循环 For i=0 to 19 step 2 Delay 100 If i&9 Then Exit For End If Next //循环5次 复制代码1. 2. 3. 4. For 10 Delay 100 EndFor //循环10次Function 函数函数 多类型,多参数 多类型复制代码1. //支持Exit Function 命令退出函数过程 2. 3. 4. 5. 6. 7.Msgbox 函数过程(&我是函数,被你调用了&) EndScript Function 函数过程(a) 函数过程=a End Function //定义一个函数过程,可以在脚本中调用这个函数//支持Exit Function 命令退出函数过程 Msgbox 函数过程(&我是函数,被你调用了&) EndScript Function 函数过程(a) 函数过程=a End Function //定义一个函数过程,可以在脚本中调用这个函数 复制代码1. 无Gosub 调用子程序调用过程 参数1 字符串型,过程名 无复制代码1. 2. 3. 4. 5. 6. 7. //可带参数传递 Call 子程序(&我是子程序,被你调用了&) EndScript Sub 子程序(a) Msgbox a End Sub //定义一个过程,可以在脚本中调用这个过程//可带参数传递 Call 子程序(&我是子程序,被你调用了&) EndScript Sub 子程序(a) Msgbox a End Sub //定义一个过程,可以在脚本中调用这个过程 复制代码1. 2. 3. 4. 5. 6. Gosub 子程序 EndScript Sub 子程序 Msgbox &我是子程序,被你调用了& Return 子程序 //定义一个过程,可以在脚本中调用这个过程Gosub 子程序 EndScript Sub 子程序 Msgbox &我是子程序,被你调用了& Return 子程序 //定义一个过程,可以在脚本中调用这个过程Goto 跳转到标记跳转到Rem标记处 参数1 字符串型,标号 无复制代码1. 2. 3. 4. 5. Goto 标记 Delay 100 Rem 标记 Msgbox &你直接跳到这里了!!,上面的延迟没有被执行!!& //跳转语句,可以跳转到rem标记过的标记处继续执行Goto 标记 Delay 100 Rem 标记 Msgbox &你直接跳到这里了!!,上面的延迟没有被执行!!& //跳转语句,可以跳转到rem标记过的标记处继续执行 复制代码1. 2. 3. 4. 5. Goto 标记 Delay 100 Rem 标记 Msgbox &你直接跳到这里了!!,上面的延迟没有被执行!!& //跳转语句,可以跳转到rem标记过的标记处继续执行Goto 标记 Delay 100 Rem 标记 Msgbox &你直接跳到这里了!!,上面的延迟没有被执行!!& //跳转语句,可以跳转到rem标记过的标记处继续执行If 如果..则判断表达式 参数1 条件型,表达式 无复制代码1. 2. 3. 4. 5. 6. 7. 8. 9. 11. 13. 例子1: i=0 If i=0 Then Msgbox &条件判断符合被通过!!& End If //通过判断表达式的取值,来执行后面的动作或控制 例子2: i=1 Msgbox &条件判断符合被通过!!& Msgbox &否则条件判断符合被通过!!&10. If i=0 Then 12. ElseIf i=1 Then 14. Else 15. Msgbox &否则!!& 16. End If 17. //通过判断表达式的取值,来执行后面的动作或控制例子1: i=0 If i=0 Then Msgbox &条件判断符合被通过!!& End If //通过判断表达式的取值,来执行后面的动作或控制 例子2: i=1 If i=0 Then Msgbox &条件判断符合被通过!!& ElseIf i=1 Then Msgbox &否则条件判断符合被通过!!& Else Msgbox &否则!!& End If //通过判断表达式的取值,来执行后面的动作或控制 复制代码1. 2. 3. 4. 5. i=0 If i=0 Msgbox &条件判断符合被通过!!& EndIf //通过判断表达式的取值,来执行后面的动作或控IfColor 颜色判断判断屏幕某点的颜色 参数1 整数型,屏幕X坐标 参数2 整数型,屏幕Y坐标 参数3 字符串型,颜色16进制值 参数4 整数型,判断条件 无复制代码1. 2. 3. 4. 5. 6. 7. 8. 9. 10. 11. 例子2: Else Msgbox &颜色不等于& End If //判断坐标点(860,27)的颜色是否等于e1b072 例子1: //判断条件(0:等于 1:不等于 2:近似等于) IfColor 860,27,&e1b072&,0 Then Msgbox &颜色等于& 12. a=1:b=1 13. IfColor 650,118,&78F0E8&,2 Then 14. 16. MessageBox &a& MessageBox &b& 15. ElseIf b=a Then 17. End if例子1: //判断条件(0:等于 1:不等于 2:近似等于) IfColor 860,27,&e1b072&,0 Then Msgbox &颜色等于& Else Msgbox &颜色不等于& End If //判断坐标点(860,27)的颜色是否等于e1b072例子2: a=1:b=1 IfColor 650,118,&78F0E8&,2 Then MessageBox &a& ElseIf b=a Then MessageBox &b& End if 复制代码1. 2. 3. 4. 5. 6. 7. Else Msgbox &颜色不等于& EndIf //判断坐标点(860,27)的颜色是否等于e1b072 //判断条件(0:等于 1:不等于 2:近似等于) IfColor 860,27,e1b072,0 Msgbox &颜色等于&//判断条件(0:等于 1:不等于 2:近似等于) IfColor 860,27,e1b072,0 Msgbox &颜色等于& Else Msgbox &颜色不等于& EndIf //判断坐标点(860,27)的颜色是否等于e1b072Rem 标记/注释标记命令可当注释 参数1 字符串型,文字 无复制代码1. 2. 3. //不支持数字开头的和符号作为标记名 //标记命令.即可当注释,也可以为Goto跳转指令作标记 Rem 脚本开始 //不支持数字开头的和符号作为标记名 //标记命令.即可当注释,也可以为Goto跳转指令作标记 Rem 脚本开始 复制代码1. 2. //标记命令.即可当注释,也可以为Goto跳转指令作标记 Rem 脚本开始RestartScript 重新启动脚本运行重新启动脚本运行 无 无复制代码1. 2. 3. 4. 5. Next RestartScript //重新启动脚本运行 For i=0 to 2 Delay 1000 Call Plugin.Msg.ShowScrTXT(0, 0, , &屏幕内容填写& & i, &0000FF&)For i=0 to 2 Delay 1000 Call Plugin.Msg.ShowScrTXT(0, 0, , &屏幕内容填写& & i, &0000FF&) Next RestartScript //重新启动脚本运行 复制代码1. 无无Select 情况条件选择根据情况选择条件判断 参数1 条件型,情况 无复制代码1. 2. 3. 4. 5. 6. 7. 8. 9. 10. 12. 14. 16. //不支持判断语句 如:Case a&0 UserVar 变量=0 &输入(0~9)数字& //&&---------------------------------------------以下是选择条件结结构判断 Select Case 变量 Case 0 Msgbox &你输入的数字为:0& Case 1 Msgbox &你输入的数字为:1& Case 2 Msgbox &你输入的数字为:2& Msgbox &你输入的数字为:3& Msgbox &你输入的数字为:4& Msgbox &你输入的数字为:5&11. Case 3 13. Case 4 15. Case 5 17. Case 6 18. 20. 22. 24. 26. Msgbox &你输入的数字为:6& Msgbox &你输入的数字为:7& Msgbox &你输入的数字为:8& Msgbox &你输入的数字为:9& Msgbox &你输入的数字不正确,请输入(0~9)数字!& 19. Case 7 21. Case 8 23. Case 9 25. Case Else 27. End Select//不支持判断语句 如:Case a&0 UserVar 变量=0 &输入(0~9)数字& //&&---------------------------------------------以下是选择条件结结构判断 Select Case 变量 Case 0 Msgbox &你输入的数字为:0& Case 1 Msgbox &你输入的数字为:1& Case 2 Msgbox &你输入的数字为:2& Case 3 Msgbox &你输入的数字为:3& Case 4 Msgbox &你输入的数字为:4& Case 5 Msgbox &你输入的数字为:5& Case 6 Msgbox &你输入的数字为:6& Case 7 Msgbox &你输入的数字为:7& Case 8 Msgbox &你输入的数字为:8& Case 9 Msgbox &你输入的数字为:9& Case Else Msgbox &你输入的数字不正确,请输入(0~9)数字!& End Select 复制代码1. 无Sub 子程序定义一个过程 参数1 字符串型,过程名 无复制代码1. //支持Exit Sub 命令退出子程序过程 2. 3. 4. 5. 6. 7.Call 子程序() EndScript Sub 子程序() Msgbox &我是子程序,被你调用了& End Sub //定义一个过程,可以在脚本中调用这个过程//支持Exit Sub 命令退出子程序过程 Call 子程序() EndScript Sub 子程序() Msgbox &我是子程序,被你调用了& End Sub //定义一个过程,可以在脚本中调用这个过程 复制代码1. 2. 3. 4. 5. 6. Gosub 子程序 EndScript Sub 子程序 Msgbox &我是子程序,被你调用了& Return 子程序 //定义一个过程,可以在脚本中调用这个过程Gosub 子程序 EndScript Sub 子程序 Msgbox &我是子程序,被你调用了& Return 子程序 //定义一个过程,可以在脚本中调用这个过程While 如果..则循环条件循环 参数1 条件型,循环条件 无复制代码1. 2. 3. 4. 5. i=0 While i=0 Msgbox &我停不下来啦!!快住手& Wend //当循环条件成立的时候,反复执行循环体i=0 While i=0 Msgbox &我停不下来啦!!快住手& Wend //当循环条件成立的时候,反复执行循环体 复制代码1. 2. 3. 4. i=0 While i=0 Msgbox &我停不下来啦!!快住手& EndWhile 5.//当循环条件成立的时候,反复执行循环体i=0 While i=0 Msgbox &我停不下来啦!!快住手& EndWhile //当循环条件成立的时候,反复执行循环体FindCenterColor 中心找色在屏幕区域从中心开始查找指定的颜色 参数1 整数型,屏幕左上角x坐标 参数2 整数型,屏幕左上角y坐标 参数3 整数型,屏幕右下角x坐标 参数4 整数型,屏幕右下角y坐标 参数5 字符串型,16进制颜色值 参数6 整数型,返回x坐标 参数7 整数型,返回y坐标 无复制代码1. 2. 3. 4. 5. 6. 7. 8. 9. //FindCenterColor left,top,right,bottom,c,x,y //在区域内从中心到外围找颜色为c的点,把坐标保存在变量x和y中 //left,top,right,bottom都是整数或者整数型变量,说明了区域的左,上,右,下界限 //颜色是类似于&0000FF&的字符串,如果不取变量,别忘了加双引号 //如果没有找到这个颜色,则x和y的值都被置为-1 FindCenterColor 0,0,800,600,&0000FF&,x,y If x&0 and y&0 Then MoveTo x,y End If10. //在区域(0,0,800,600)中找红色(&0000FF&)的点,如果找到,则把鼠标移动到这个点//FindCenterColor left,top,right,bottom,c,x,y //在区域内从中心到外围找颜色为c的点,把坐标保存在变量x和y中 //left,top,right,bottom都是整数或者整数型变量,说明了区域的左,上,右,下界限 //颜色是类似于&0000FF&的字符串,如果不取变量,别忘了加双引号 //如果没有找到这个颜色,则x和y的值都被置为-1 FindCenterColor 0,0,800,600,&0000FF&,x,y If x&0 and y&0 Then MoveTo x,y End If //在区域(0,0,800,600)中找红色(&0000FF&)的点,如果找到,则把鼠标移动到这个点 复制代码1. 2. 3. //VBSCall FindCenterColor(left,top,right,bottom,c,x,y) //在区域内从中心到外围找颜色为c的点,把坐标保存在变量x和y中 //left,top,right,bottom都是整数或者整数型变量,说明了区域的左,上,右,下界限 4. 5. 6. 7. 8. 9.//颜色是类似于&0000FF&的字符串,如果不取变量,别忘了加双引号 //如果没有找到这个颜色,则x和y的值都被置为-1 VBSCall FindCenterColor(0,0,800,600,&0000FF&,x,y) If x&0 and y&0 MoveTo x,y EndIf10. //在区域(0,0,800,600)中找红色(&0000FF&)的点,如果找到,则把鼠标移动到这个点//VBSCall FindCenterColor(left,top,right,bottom,c,x,y) //在区域内从中心到外围找颜色为c的点,把坐标保存在变量x和y中 //left,top,right,bottom都是整数或者整数型变量,说明了区域的左,上,右,下界限 //颜色是类似于&0000FF&的字符串,如果不取变量,别忘了加双引号 //如果没有找到这个颜色,则x和y的值都被置为-1 VBSCall FindCenterColor(0,0,800,600,&0000FF&,x,y) If x&0 and y&0 MoveTo x,y EndIf //在区域(0,0,800,600)中找红色(&0000FF&)的点,如果找到,则把鼠标移动到这个点FindColor 找色在屏幕区域从左到右、从上到下的查找指定的颜色 参数1 整数型,屏幕左上角x坐标 参数2 整数型,屏幕左上角y坐标 参数3 整数型,屏幕右下角x坐标 参数4 整数型,屏幕右下角y坐标 参数5 字符串型,16进制颜色值 参数6 整数型,返回x坐标 参数7 整数型,返回y坐标 无复制代码1. 2. 3. 4. 5. 6. 7. 8. 9. //FindColor left,top,right,bottom,c,x,y //在区域内从左到右,从上到下找颜色为c的点,把坐标保存在变量x和y中 //left,top,right,bottom都是整数

我要回帖

更多关于 格罗亚传奇职业 的文章

 

随机推荐