易语言地下城与勇士辅助自动刷图类源码

DNF辅助自动刷图类

仅供学习参考，禁止商业用途

.版本 2
.支持库 EThread
.支持库 spec
.程序集 自动
.子程序 自动刷图
.判断开始 (全局_总开关.自动刷图开关 ＝ 假)
全局_总开关.自动刷图开关 ＝ 真
.判断开始 (文件读配置 (“刷图模式”) ＝ 1)
系统公告 (“自动刷图 - 开启”)
.判断 (文件读配置 (“刷图模式”) ＝ 2)
系统公告 (“自动剧情 - 开启”)
.判断 (文件读配置 (“刷图模式”) ＝ 3)
系统公告 (“自动深渊 - 开启”)
.默认
.判断结束
启动线程 (&自动主线程, , 全局_总开关.自动刷图句柄)
.默认
全局_总开关.自动刷图开关 ＝ 假
.判断开始 (文件读配置 (“刷图模式”) ＝ 1)
系统公告 (“自动刷图 - 关闭”)
.判断 (文件读配置 (“刷图模式”) ＝ 2)
系统公告 (“自动剧情 - 关闭”)
.判断 (文件读配置 (“刷图模式”) ＝ 3)
系统公告 (“自动深渊 - 关闭”)
.默认
.判断结束
强制结束线程 (全局_总开关.自动刷图句柄)
.判断结束
.子程序 自动主线程
.局部变量 死循环, 整数型
.局部变量 返回值, 整数型
.判断循环首 (死循环 ＝ 0)
.如果真 (汇编_读整数型 (#对话基址) ＝ 1)
延迟 (200)
内存按键 (#空格键)
.如果真结束
.如果真 (文件读配置 (“刷图模式”) ≠ 3)
超级延时 (200)
返回值 ＝ 刷图返回值 ()
.如果真结束
.如果真 (文件读配置 (“刷图模式”) ＝ 3)
超级延时 (200)
返回值 ＝ 深渊返回值 ()
.如果真结束
.如果真 (返回值 ＝ 1004)
超级延时 (200)
自动角色 ()
到循环尾 ()
.如果真结束
.如果真 (返回值 ＝ 1005)
超级延时 (200)
自动模式 ()
到循环尾 ()
.如果真结束
.如果真 (返回值 ＝ 1001)
超级延时 (200)
.如果真 (进图判断 ＝ 假)
进图判断 ＝ 真
超级延时 (1200)
全局_消息反馈 ＝ 19
启动线程 (&全屏开关, , )
.如果真结束
延迟 (200)
全局_消息反馈 ＝ 7
到循环尾 ()
.如果真结束
.如果真 (返回值 ＝ 1002)
全局_消息反馈 ＝ 7
超级延时 (200)
自动顺图 ()
延迟 (600)
到循环尾 ()
.如果真结束
.如果真 (返回值 ＝ 1003)
超级延时 (200)
.如果真 (文件读配置 (“刷图模式”) ≠ 3)
自动出图 ()
.如果真结束
.如果真 (文件读配置 (“刷图模式”) ＝ 3)
深渊出图 ()
.如果真结束
到循环尾 ()
.如果真结束
.判断循环尾 ()
.子程序 刷图返回值, 整数型
全局_总开关.疲劳值 ＝ 疲劳 ()
.判断开始 (取是否城镇 () ＝ 假)
.判断开始 (取是否开门 () ＝ 假)
返回 (1001)
.默认
.判断开始 (是否在BOSS房 () ＝ 假)
返回 (1002)
.默认
返回 (1003)
.判断结束
.判断结束
.判断 (全局_总开关.疲劳值 ＜ 1 或 全局_总开关.自动刷图开关 ＝ 真 且 判断远古地图 () ＝ 真 且 全局_总开关.疲劳值 ＜ 6)
返回 (1004)
.判断 (全局_总开关.疲劳值 ≥ 1)
返回 (1005)
.默认
返回 (0)
.判断结束
.子程序 深渊返回值, 整数型
全局_总开关.疲劳值 ＝ 疲劳 ()
.判断开始 (取是否城镇 () ＝ 假)
.判断开始 (取是否开门 () ＝ 假)
返回 (1001)
.默认
.判断开始 (取深渊柱子存在 () ＝ 假)
返回 (1002)
.默认
返回 (1003)
.判断结束
.判断结束
.判断 (全局_总开关.疲劳值 ＜ 1)
返回 (1004)
.判断 (全局_总开关.疲劳值 ≥ 1)
返回 (1005)
.默认
返回 (0)
.判断结束
.子程序 自动模式
.判断开始 (文件读配置 (“刷图模式”) ＝ 1)
自动智能 (1)
.判断 (文件读配置 (“刷图模式”) ＝ 2)
自动智能 (2)
.判断 (文件读配置 (“刷图模式”) ＝ 3)
自动智能 (3)
.默认
.判断结束
.子程序 自动智能
.参数 类型, 整数型
.局部变量 主线类型, 整数型
.局部变量 局任务, 整数型
.如果真 (类型 ＝ 1) ' 自动刷图
全局_刷图.地图编号 ＝ 文件读配置 (“副本编号”)
全局_刷图.地图等级 ＝ 文件读配置 (“副本难度”)
全局_消息反馈 ＝ 1 ' 到副本门口
超级延时 (500)
全局_消息反馈 ＝ 2 ' 选图
超级延时 (500)
.判断开始 (文件读配置 (“副本难度”) ＜ 5)
全局_消息反馈 ＝ 3 ' 进图
.默认
全局_消息反馈 ＝ 4 ' 进图
.判断结束
超级延时 (3000)
全局_消息反馈 ＝ 19 ' 透明评分
.如果真结束
.如果真 (类型 ＝ 2) ' 自动剧情
超级延时 (500)
智能计算任务 ()
超级延时 (500)
.如果真结束
.如果真 (类型 ＝ 3) ' 自动深渊
全局_刷图.地图编号 ＝ 文件读配置 (“副本编号”)
全局_刷图.地图等级 ＝ 文件读配置 (“副本难度”)
全局_消息反馈 ＝ 1
超级延时 (500)
全局_消息反馈 ＝ 2
超级延时 (500)
全局_消息反馈 ＝ 27
超级延时 (3000)
全局_消息反馈 ＝ 19 ' 透明评分
.如果真结束
.子程序 自动顺图
.局部变量 当前房间, 坐标型
当前房间 ＝ 当前房间 ()
.如果真 (全局_刷图.地图编号 ＝ 104 或 全局_刷图.地图编号 ＝ 192)
.如果真 (文件读配置 (“是否全图”) ＝ 1)
格蓝迪自动全图 ()
.如果真结束
.如果真 (文件读配置 (“是否全图”) ＝ 2)
钢铁自动全图 ()
.如果真结束
.如果真结束
.如果真 (文件读配置 (“刷图模式”) ＝ 3)
时间广场深渊 ()
.如果真结束
.如果真 (文件读配置 (“刷图模式”) ≠ 3)
延时 (100)
顺图调用 ()
.如果真结束
.子程序 自动出图
超级延时 (1000)
.如果真 (取怪物是否死亡 () ＝ 真 且 取是否开门 () ＝ 真)
.判断循环首 (汇编_读整数型 (#对话基址) ≠ 0)
内存按键 (#空格键)
.判断循环尾 ()
超级延时 (100)
全局_消息反馈 ＝ 25 ' 通关确认
全局_消息反馈 ＝ 8 ' 翻牌
超级延时 (200)
启动线程 (&全屏开关, , )
.如果真 (文件读配置 (“刷图模式”) ＝ 1)
出图公告 (1)
.如果真结束
.如果真 (文件读配置 (“刷图模式”) ＝ 2)
出图公告 (2)
.如果真结束
.如果真 (文件读配置 (“刷图模式”) ＝ 3)
出图公告 (3)
.如果真结束
进图判断 ＝ 假
超级延时 (1000)
.如果真 (局_任务ID ≠ 0)
提交Call (局_任务ID)
局_任务ID ＝ 0
.如果真结束
.如果真 (局_任务ID ＝ 0)
提交Call (剧情任务ID)
.如果真结束
超级延时 (100)
.如果真 (取是否制裁 () ＝ 假)
全局_消息反馈 ＝ 7 ' 捡物
.如果真结束
超级延时 (4500)
全局_消息反馈 ＝ 11 ' 出图
.判断循环首 (取是否城镇 () ＝ 假)
超级延时 (300)
.判断循环尾 ()
超级延时 (500)
全局_消息反馈 ＝ 10 ' 卖物
超级延时 (500)
.如果真结束
.子程序 深渊出图
超级延时 (500)
.如果真 (取怪物是否死亡 () ＝ 真 且 取是否开门 () ＝ 真)
出图公告 (3)
超级延时 (100)
.如果真 (取是否制裁 () ＝ 假)
全局_消息反馈 ＝ 7 ' 捡物
.如果真结束
超级延时 (100)
全局_消息反馈 ＝ 11 ' 出图
.判断循环首 (取是否城镇 () ＝ 假)
超级延时 (10)
.判断循环尾 ()
超级延时 (500)
全局_消息反馈 ＝ 10 ' 卖物
超级延时 (500)
.如果真结束
.子程序 自动角色
全局_刷图.自动角色 ＝ 汇编_加 (全局_刷图.自动角色, 1)
.如果真 (全局_刷图.自动角色 ≥ 文件读配置 (“角色数量”))
公告 (“已刷完配置指定[ ” ＋ 到文本 (全局_刷图.自动角色) ＋ “ ]个角色 - 停止挂机”)
公告 (“当前北京时间：” ＋ 到文本 (取现行时间 ()))
全局_总开关.自动刷图开关 ＝ 假
强制结束线程 (全局_总开关.自动刷图句柄)
返回 ()
.如果真结束
超级延时 (300)
公告 (“自动完成” ＋ 到文本 (全局_刷图.自动角色) ＋ “个角色 自动换角色”)
角色位置 ＝ 汇编_加 (汇编_取偏移地址 (#角色基址, { 200, 200, 0 }), 1)
超级延时 (1000)
组包_选择界面 ()
超级延时 (1000)
组包_选择角色 (角色位置)
超级延时 (2000)
.计次循环首 (999, )
.如果真 (取游戏状态 () ＝ 1)
跳出循环 ()
.如果真结束
超级延时 (1000)
.计次循环尾 ()
超级延时 (4000)
全局_刷图.翻拍次数 ＝ 0
.子程序 格蓝迪自动全图
.局部变量 当前, 坐标型
当前 ＝ 当前房间 ()
.如果真 (当前.x ＝ 0 且 当前.y ＝ 0)
拾取遍历 ()
顺图至右 ()
.如果真结束
.如果真 (当前.x ＝ 1 且 当前.y ＝ 0)
拾取遍历 ()
顺图至右 ()
.如果真结束
.如果真 (当前.x ＝ 2 且 当前.y ＝ 0)
拾取遍历 ()
顺图至下 ()
.如果真结束
.如果真 (当前.x ＝ 2 且 当前.y ＝ 1)
拾取遍历 ()
顺图至左 ()
.如果真结束
.如果真 (当前.x ＝ 1 且 当前.y ＝ 1)
拾取遍历 ()
顺图至下 ()
.如果真结束
.如果真 (当前.x ＝ 1 且 当前.y ＝ 2)
拾取遍历 ()
顺图至右 ()
.如果真结束
.如果真 (当前.x ＝ 2 且 当前.y ＝ 2)
拾取遍历 ()
顺图至右 ()
.如果真结束
.如果真 (当前.x ＝ 3 且 当前.y ＝ 2)
拾取遍历 ()
顺图至上 ()
.如果真结束
.子程序 钢铁自动全图
.局部变量 当前, 坐标型
当前 ＝ 当前房间 ()
.判断开始 (当前.x ＝ 0 且 当前.y ＝ 0)
拾取遍历 ()
顺图至右 ()
.判断 (当前.x ＝ 1 且 当前.y ＝ 0)
拾取遍历 ()
顺图至右 ()
.判断 (当前.x ＝ 2 且 当前.y ＝ 0)
拾取遍历 ()
顺图至下 ()
.判断 (当前.x ＝ 2 且 当前.y ＝ 1)
拾取遍历 ()
顺图至左 ()
.判断 (当前.x ＝ 1 且 当前.y ＝ 1)
拾取遍历 ()
顺图至左 ()
.判断 (当前.x ＝ 0 且 当前.y ＝ 1)
拾取遍历 ()
顺图至下 ()
.判断 (当前.x ＝ 0 且 当前.y ＝ 2)
拾取遍历 ()
顺图至下 ()
.判断 (当前.x ＝ 0 且 当前.y ＝ 3)
拾取遍历 ()
顺图至右 ()
.判断 (当前.x ＝ 1 且 当前.y ＝ 3)
拾取遍历 ()
顺图至上 ()
.判断 (当前.x ＝ 1 且 当前.y ＝ 2)
拾取遍历 ()
顺图至右 ()
.判断 (当前.x ＝ 2 且 当前.y ＝ 2)
拾取遍历 ()
顺图至右 ()
.默认
.判断结束
.子程序 时间广场深渊
.局部变量 当前, 坐标型
当前 ＝ 当前房间 ()
.如果真 (当前.x ＝ 0 且 当前.y ＝ 0)
全局_总开关.重置 ＝ 1
拾取遍历 ()
顺图至右 ()
.如果真结束
.如果真 (当前.x ＝ 1 且 当前.y ＝ 0)
拾取遍历 ()
顺图至右 ()
.如果真结束
.如果真 (当前.x ＝ 2 且 当前.y ＝ 0)
拾取遍历 ()
顺图至右 ()
.如果真结束
.如果真 (当前.x ＝ 3 且 当前.y ＝ 0)
拾取遍历 ()
顺图至下 ()
.如果真结束
.如果真 (当前.x ＝ 3 且 当前.y ＝ 1)
.如果 (全局_总开关.重置 ＝ 1)
拾取遍历 ()
顺图至右 ()
.否则
拾取遍历 ()
顺图至左 ()
.如果结束
.如果真结束
.如果真 (当前.x ＝ 4 且 当前.y ＝ 1)
全局_总开关.重置 ＝ 0
拾取遍历 ()
顺图至左 ()
.如果真结束
.如果真 (当前.x ＝ 2 且 当前.y ＝ 1)
拾取遍历 ()
顺图至左 ()
.如果真结束
.如果真 (当前.x ＝ 1 且 当前.y ＝ 1)
拾取遍历 ()
顺图至下 ()
.如果真结束
.如果真 (当前.x ＝ 1 且 当前.y ＝ 2)
拾取遍历 ()
顺图至下 ()
.如果真结束
.如果真 (当前.x ＝ 1 且 当前.y ＝ 3)
拾取遍历 ()
顺图至右 ()
.如果真结束
.如果真 (当前.x ＝ 2 且 当前.y ＝ 3)
拾取遍历 ()
顺图至上 ()
.如果真结束
.如果真 (当前.x ＝ 2 且 当前.y ＝ 2)
拾取遍历 ()
顺图至右 ()
.如果真结束
.如果真 (当前.x ＝ 3 且 当前.y ＝ 2)
拾取遍历 ()
顺图至右 ()
.如果真结束
.如果真 (当前.x ＝ 4 且 当前.y ＝ 2)
拾取遍历 ()
顺图至右 ()
.如果真结束

总结

以上就是这篇文章的全部内容了，希望本文的内容对大家的学习或者工作具有一定的参考学习价值，谢谢大家对华域联盟的支持。如果你想了解更多相关内容请查看下面相关链接