易语言魔兽世界怀旧服自动钓鱼源码

疫情期间，学习了一下易语言，写个自动钓鱼前台辅助，自己调了一个晚上，还可以。

视角要调到水平行

.版本 2
.支持库 dm

.程序集窗口程序集_启动窗口

.子程序 _按钮1_被单击
.局部变量句柄, 整数型
.局部变量绑定, 整数型
.局部变量退出, 文本型

延时 (3000)
句柄＝窗口_大漠获取句柄 (“”, “魔兽世界”)
输出调试文本 (句柄)
绑定＝绑定窗口 (句柄, “normal”, “normal”, “normal”, 0)

输出调试文本 (绑定)
延时 (300)
' 启动线程 (&_时钟1_周期事件, , )

' 退出＝标准输入 ()
.' 判断循环首 (到整数 (退出) ≠ #V键)
' 钓鱼过程 ()
.' 判断循环尾 ()
钓鱼过程 ()

.子程序钓鱼过程
.局部变量返回坐标, 文本型
.局部变量计次, 整数型
.局部变量是否有声音, 逻辑型

DM.KeyPress (49)
延时 (3000)
' c4a279-000000|b49468-000000
' 返回坐标＝ DM.FindColorE (399, 97, 791, 591, “d4ad6b-000000|c1996b-000000”, 0.9, 0) ‘白天
返回坐标＝ DM.FindColorE (355, 9, 908, 588, “c4a279-000000|b49468-000000”, 0.9, 0)
输出调试文本 (“a:” ＋返回坐标)
延时 (300)

.如果真 (返回坐标 ≠ “-1|-1”)
返回数组＝分割文本 (返回坐标, “|”, )
DM.MoveTo (到整数 (返回数组 [1]), 到整数 (返回数组 [2]))

延时 (10000)
DM.RightClick ()
延时 (1000)
DM.KeyPress (#空格键)

延时 (100)
DM.MoveTo (0, 0)
延时 (1000)

.如果真结束

钓鱼过程 ()

.子程序钓到鱼
.局部变量返回坐标, 文本型
.局部变量返回坐标2, 文本型

返回坐标2 ＝ DM.FindColorE (587, 590, 762, 641, “00bf00-000000”, 1, 0)
.如果真 (返回坐标2 ＝ “-1|-1”)
延时 (1000)

DM.RightClick ()
延时 (1000)
DM.KeyPress (#空格键)
延时 (1000)
返回 ()
.如果真结束

返回坐标＝ DM.FindColorE (到整数 (返回数组 [1]) ＋ 10, 到整数 (返回数组 [2]) ＋ 20, 到整数 (返回数组 [1]) ＋ 30, 到整数 (返回数组 [2]) ＋ 50, “8ca7d2-000000|abc4f0-000000”, 0.9, 0)
.如果 (返回坐标 ≠ “-1|-1”)
延时 (800)
输出调试文本 (“b” ＋返回坐标)
DM.RightClick ()
延时 (1000)
DM.KeyPress (#空格键)
延时 (1000)
DM.RightClick ()

.否则
钓到鱼 ()
.如果结束

.子程序 _按钮2_被单击

DM.UnBindWindow ()
_启动窗口.销毁 ()

.子程序判断声音, 逻辑型
.局部变量绑定, 整数型
.局部变量返回坐标, 文本型

绑定＝绑定窗口 (声音句柄, “dx2”, “windows”, “windows”, 0)
返回坐标＝ DM.FindColorE (29, 122, 89, 271, “33c133-000000”, 1, 0)
输出调试文本 (“c:” ＋返回坐标)
延时 (300)
.如果 (返回坐标 ≠ “-1|-1”)
返回 (假)
.否则
返回 (真)
.如果结束

' DM.UnBindWindow ()
DM.SetWindowState (魔兽世界句柄, 1)
DM.LeftClick ()
延时 (300)

.子程序 __启动窗口_创建完毕

' 魔兽世界句柄＝窗口_大漠获取句柄 (“”, “魔兽世界”)
' 声音句柄＝窗口_大漠获取句柄 (“”, “音量”)
' 延时 (5000)
运行 (“regsvr32 ” ＋取运行目录 () ＋ “\dm.dll” ＋ “ -s”, 真, )

易语言魔兽世界怀旧服自动钓鱼源码相关推荐

易语言网易云音乐登录post源码
易语言网易云音乐登录post源码以下是部分源码: .版本 2 .支持库 dp1 data ＝文本_替换 (#常量2, , , , "账号", 账号, "密码" ...
【易语言】HTTP下载器成品+源码
[易语言]HTTP下载器成品+源码易语言简单制作,直接使用即可直接上成品: 可以直接拿到程序里面使用,可以配合WInform等一起使用部分参考源码: 成本&源码下载链接:点击下载
易语言网页_取文本_reg的源码
.版本 2.子程序网页_取文本_reg, 文本型, 公开, 去掉网页源码中的HTML标签,保留纯文本(正则方式) .参数网页源码, 文本型, , 网页源码如果含中文且乱码的,请先解码 .局部变量 ...
易语言超级算法转php,易语言 PHP RC4算法同步应用源码
.版本 2 .程序集窗口程序集_启动窗口 .程序集变量 URL, 文本型 .子程序 __启动窗口_创建完毕 URL ＝ "http://127.0.0.1/rc4/" .子程序 ...
易语言专治反截图程序源码
加了个大漠+直接可以范围截图反截图的软件页面模块你们自己找,源码里稍微改下就可以用了用法点下⊥按钮(注意是点下不是按住)点一下后按钮锁定,然后你鼠标在其他页面上点一下拉开一个范围区域,软件就会截 ...
易语言单窗口单ip软件源码_好人多窗口同步器：多台电脑同步视频演示
一.<好人多窗口同步器>作用:多台电脑同步操作,所同步电脑,需要在同一个路由器下,才可以.二.如何查询IP?打开"windows"菜单"---->&qu ...
易语言关闭指定窗口_易语言取外部程序指定窗口位置源码 _易语言源码网_易语言资源网...
取外部程序指定窗口位置系统结构:取窗口位置,取指定窗口句柄,窗口是否最大,窗口是否最小, ======窗口程序集1 | | | |------ _按钮1_被单击 | | | | ====== ...
易语言单窗口单ip软件源码_梦幻西游怎样多开ip转金？十大攻略秘籍速来看
各位好!,我依然是小芝麻,近期几日总是有盆友在私聊我,"小芝麻看着你的转金专缉,那么多方式,能够帮我建议一类,最安全可靠能用的吗?""小芝麻,你的转金攻略大全,我有点儿 ...
python接收易语言dll消息_易语言[项目开发]-插件信息提取程序源码,易语言获取DLL文件信息...
易语言获取DLL文件信息源码系统结构:载入动态链接库_,呼叫窗口函数地址_,取进程地址_,FreeLibrary,系统接口_取版本信息,系统接口_取接口信息,外部接口_加载窗口, ======窗口程 ...

易语言魔兽世界怀旧服自动钓鱼源码

易语言魔兽世界怀旧服自动钓鱼源码相关推荐

最新文章

热门文章