易语言地下城与勇士辅助自动刷图类源码
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)
拾取遍历 ()
顺图至右 ()
.如果真结束
总结
以上是 易语言地下城与勇士辅助自动刷图类源码 的全部内容, 来源链接: utcz.com/z/336425.html