|

楼主 |
发表于 2020-8-12 10:32:52
|
显示全部楼层
浙江省温州市
.版本 2
.支持库 eAPI
.支持库 spec
.支持库 EThread
.程序集 窗口程序集_启动窗口
.程序集变量 dm, 对象
.程序集变量 dm2, 对象
.程序集变量 dm3, 对象
.程序集变量 dm4, 对象
.程序集变量 dm5, 对象
.程序集变量 注册码, 文本型
.程序集变量 附加码, 文本型
.程序集变量 开始, 整数型
.程序集变量 线程句柄, 整数型, , "5"
.程序集变量 游戏总句柄列表, 文本型, , "0"
.程序集变量 许可, 整数型
.子程序 __启动窗口_创建完毕
SetDllPathA (“d:\dm.dll”, 0)
dm.创建 (“dm.dmsoft”, )
dm2.创建 (“dm.dmsoft”, )
dm3.创建 (“dm.dmsoft”, )
dm4.创建 (“dm.dmsoft”, )
dm5.创建 (“dm.dmsoft”, )
注册码 = “这里隐藏不给看”
附加码 = “A1989”
' 开始 = 注册热键 (取窗口句柄 (), 标签1.取窗口句柄 (), 0, #Home键)
.子程序 _标签1_反馈事件, 整数型
.参数 参数一, 整数型
.参数 参数二, 整数型
.如果真 (参数一 = 开始)
_按钮1_被单击 ()
.如果真结束
.子程序 _按钮1_被单击
.局部变量 列表, 文本型, , "0"
.局部变量 m, 整数型
' 获取所有总窗口句柄,判断数组来启动线程数,绑定窗口在线程内绑定。
列表 = 取所有窗口列表 ()
.计次循环首 (取数组成员数 (列表), m)
.如果真 (取窗口类名 (到整数 (列表 [m])) = “DHXYMainFrame”)
加入成员 (游戏总句柄列表, 列表 [m])
.如果真结束
.计次循环尾 ()
调试输出 (游戏总句柄列表)
.如果 (到整数 (取数组成员数 (游戏总句柄列表)) = 1)
启动线程 (&绑定查找, , 线程句柄 [1])
.否则
.如果 (到整数 (取数组成员数 (游戏总句柄列表)) = 2)
启动线程 (&绑定查找, , 线程句柄 [1])
延迟 (5000)
启动线程 (&绑定查找2, , 线程句柄 [2])
.否则
.如果 (到整数 (取数组成员数 (游戏总句柄列表)) = 3)
启动线程 (&绑定查找, , 线程句柄 [1])
延迟 (5000)
启动线程 (&绑定查找2, , 线程句柄 [2])
延迟 (5000)
启动线程 (&绑定查找3, , 线程句柄 [3])
.否则
.如果 (到整数 (取数组成员数 (游戏总句柄列表)) = 4)
启动线程 (&绑定查找, , 线程句柄 [1])
延迟 (3000)
启动线程 (&绑定查找2, , 线程句柄 [2])
延迟 (3000)
启动线程 (&绑定查找3, , 线程句柄 [3])
延迟 (3000)
启动线程 (&绑定查找4, , 线程句柄 [4])
.否则
.如果 (到整数 (取数组成员数 (游戏总句柄列表)) = 5)
启动线程 (&绑定查找, , 线程句柄 [1])
延迟 (3000)
启动线程 (&绑定查找2, , 线程句柄 [2])
延迟 (3000)
启动线程 (&绑定查找3, , 线程句柄 [3])
延迟 (3000)
启动线程 (&绑定查找4, , 线程句柄 [4])
延迟 (3000)
启动线程 (&绑定查找5, , 线程句柄 [5])
.否则
.如果真 (到整数 (取数组成员数 (游戏总句柄列表)) > 5)
信息框 (“最多只能开五个”, 0, , )
.如果真结束
.如果结束
.如果结束
.如果结束
.如果结束
.如果结束
.子程序 _按钮2_被单击
.局部变量 m, 整数型
.计次循环首 (5, m)
强制结束线程 (线程句柄 [m])
.计次循环尾 ()
清除数组 (游戏总句柄列表)
.子程序 __启动窗口_将被销毁
_按钮2_被单击 ()
dm.数值方法 (“UnBindWindow”, )
dm.清除 ()
dm2.数值方法 (“UnBindWindow”, )
dm2.清除 ()
dm3.数值方法 (“UnBindWindow”, )
dm3.清除 ()
dm4.数值方法 (“UnBindWindow”, )
dm4.清除 ()
dm5.数值方法 (“UnBindWindow”, )
dm5.清除 ()
' 撤销热键 (取窗口句柄 (), 开始)
.子程序 __启动窗口_首次激活
.局部变量 注册1, 整数型
.局部变量 注册2, 整数型
.局部变量 注册3, 整数型
.局部变量 注册4, 整数型
.局部变量 注册5, 整数型
注册1 = dm.数值方法 (“reg”, 注册码, 附加码)
dm.数值方法 (“EnableRealKeypad”, 1)
dm.数值方法 (“EnableRealMouse”, 120, 20)
dm.数值方法 (“SetPath”, “D:\test”)
dm.数值方法 (“SetDict”, 0, “1.txt”)
dm.数值方法 (“UseDict”, 0)
dm.数值方法 (“SetMouseDelay”, “Windows3”, 80)
注册2 = dm2.数值方法 (“reg”, 注册码, 附加码)
dm2.数值方法 (“EnableRealKeypad”, 1)
dm2.数值方法 (“EnableRealMouse”, 120, 20)
dm2.数值方法 (“SetPath”, “D:\test”)
dm2.数值方法 (“SetDict”, 0, “1.txt”)
dm2.数值方法 (“UseDict”, 0)
dm2.数值方法 (“SetMouseDelay”, “Windows3”, 80)
注册3 = dm3.数值方法 (“reg”, 注册码, 附加码)
dm3.数值方法 (“EnableRealKeypad”, 1)
dm3.数值方法 (“EnableRealMouse”, 120, 20)
dm3.数值方法 (“SetPath”, “D:\test”)
dm3.数值方法 (“SetDict”, 0, “1.txt”)
dm3.数值方法 (“UseDict”, 0)
dm3.数值方法 (“SetMouseDelay”, “Windows3”, 80)
注册4 = dm4.数值方法 (“reg”, 注册码, 附加码)
dm4.数值方法 (“EnableRealKeypad”, 1)
dm4.数值方法 (“EnableRealMouse”, 120, 20)
dm4.数值方法 (“SetPath”, “D:\test”)
dm4.数值方法 (“SetDict”, 0, “1.txt”)
dm4.数值方法 (“UseDict”, 0)
dm4.数值方法 (“SetMouseDelay”, “Windows3”, 80)
注册5 = dm5.数值方法 (“reg”, 注册码, 附加码)
dm5.数值方法 (“EnableRealKeypad”, 1)
dm5.数值方法 (“EnableRealMouse”, 120, 20)
dm5.数值方法 (“SetPath”, “D:\test”)
dm5.数值方法 (“SetDict”, 0, “1.txt”)
dm5.数值方法 (“UseDict”, 0)
dm5.数值方法 (“SetMouseDelay”, “Windows3”, 80)
调试输出 (注册1, 注册2, 注册3, 注册4, 注册5)
.子程序 切换
dm.数值方法 (“KeyDown”, 17)
dm.数值方法 (“KeyPress”, 9)
dm.数值方法 (“KeyUp”, 17)
.子程序 绑定查找
.局部变量 句柄, 整数型
.局部变量 绑定, 整数型
.局部变量 延迟随机, 整数型
置随机数种子 ()
延迟随机 = 取随机数 (2500, 3500)
句柄 = 到整数 (游戏总句柄列表 [1])
绑定 = dm.数值方法 (“BindWindowEx”, 句柄, “gdi”, “windows3”, “dx.keypad.input.lock.api|dx.keypad.state.api|dx.keypad.api”, “dx.public.graphic.protect|dx.public.km.protect|dx.public.hack.speed”, 101)
调试输出 (“线程1绑定”, 绑定)
.判断循环首 (绑定 > 0)
延迟 (延迟随机)
查找点击 ()
死亡执行 ()
.判断循环尾 ()
.子程序 查找点击
.局部变量 文字, 文本型
.局部变量 颜色, 文本型
.局部变量 图片, 文本型
.局部变量 自动, 整数型
' 医宝宝
文字 = “全部医治和修复”
颜色 = “00d011-000000”
自动 = 查找自动 (文字, 颜色)
.如果真 (自动 = 1)
循环执行 (文字, 颜色)
.如果真结束
' 领双
文字 = “一小时”
颜色 = “00d011-000000”
自动 = 查找自动 (文字, 颜色)
.如果真 (自动 = 1)
循环执行 (文字, 颜色)
.如果真结束
' 修装备
文字 = “确认修理”
颜色 = “00d011-000000”
自动 = 查找自动 (文字, 颜色)
.如果真 (自动 = 1)
循环执行 (文字, 颜色)
.如果真结束
' 住店
文字 = “我要住店”
颜色 = “00d011-000000”
自动 = 查找自动 (文字, 颜色)
.如果真 (自动 = 1)
循环执行 (文字, 颜色)
.如果真结束
' 关弹窗
关窗执行 ()
' 点自动
文字 = “回合”
颜色 = “ffffff-000000”
自动 = 查找自动 (文字, 颜色)
.如果真 (自动 = 0)
点击自动 ()
.如果真结束
.子程序 循环执行
.参数 文字, 文本型
.参数 颜色, 文本型
.局部变量 x, 整数型
.局部变量 y, 整数型
.局部变量 三十随机, 整数型
.局部变量 十随机, 整数型
.局部变量 五随机, 整数型
.局部变量 延迟随机, 整数型
置随机数种子 ()
延迟随机 = 取随机数 (80, 120)
三十随机 = 取随机数 (10, 30)
十随机 = 取随机数 (3, 10)
五随机 = 取随机数 (1, 5)
dm.数值方法 (“FindStr”, 151, 297, 553, 425, 文字, 颜色, 1, x, y)
.循环判断首 ()
.如果真 (x > -1)
dm.数值方法 (“MoveTo”, x + 三十随机, y + 十随机)
延迟 (延迟随机)
dm.数值方法 (“LeftClick”, )
延迟 (延迟随机)
dm.数值方法 (“MoveTo”, 800, 延迟随机 × 2)
延迟 (延迟随机 × 2)
切换 ()
延迟 (延迟随机 × 2)
.如果真结束
关窗执行 ()
dm.数值方法 (“FindStr”, 151, 297, 553, 425, 文字, 颜色, 1, x, y)
调试输出 (“找字点击”, x, y)
.循环判断尾 (x > -1)
.子程序 死亡执行
.局部变量 x, 整数型
.局部变量 y, 整数型
.局部变量 五随机, 整数型
.局部变量 延迟随机, 整数型
.局部变量 归队, 整数型
.局部变量 m, 整数型
.局部变量 暂离, 文本型
.局部变量 暂离数量, 文本型, , "0"
置随机数种子 ()
五随机 = 取随机数 (1, 5)
延迟随机 = 取随机数 (100, 200)
归队 = dm.数值方法 (“FindStr”, 232, 59, 537, 114, “离|归”, “ffffff-000000”, 1, x, y)
.如果真 (x > -1)
暂离 = dm.文本方法 (“FindStrEx”, 232, 59, 537, 114, “离”, “ffffff-000000”, 1, x, y)
暂离数量 = 分割文本 (暂离, “|”, )
.循环判断首 ()
归队 = dm.数值方法 (“FindStr”, 232, 59, 537, 114, “离|归”, “ffffff-000000”, 1, x, y)
.如果真 (归队 > 0)
关窗执行 ()
dm.数值方法 (“MoveTo”, x + 五随机, y + 五随机)
延迟 (延迟随机)
dm.数值方法 (“LeftClick”, )
延迟 (延迟随机)
dm.数值方法 (“MoveTo”, 800, 延迟随机 × 2)
延迟 (延迟随机 × 2)
m = m + 1
.如果真结束
切换 ()
延迟 (延迟随机 × 2)
.循环判断尾 (m < 到整数 (取数组成员数 (暂离数量)))
.如果真结束
.子程序 关窗执行
.局部变量 x, 整数型
.局部变量 y, 整数型
.局部变量 五随机, 整数型
.局部变量 延迟随机, 整数型
置随机数种子 ()
五随机 = 取随机数 (1, 5)
延迟随机 = 取随机数 (200, 400)
' 找各种叉号点击
.计次循环首 (3, )
dm.数值方法 (“FindPic”, 0, 0, 812, 637, “弹窗.bmp”, “000000”, 0.95, 0, x, y)
.如果真 (x > -1)
dm.数值方法 (“MoveTo”, x + 五随机, y + 五随机)
延迟 (延迟随机)
dm.数值方法 (“LeftClick”, )
延迟 (延迟随机)
dm.数值方法 (“MoveTo”, 800, 延迟随机)
延迟 (延迟随机)
.如果真结束
dm.数值方法 (“FindPic”, 0, 0, 812, 637, “大地图关闭.bmp|小地图关闭.bmp”, “000000”, 1, 0, x, y)
.如果真 (x > -1)
dm.数值方法 (“MoveTo”, x + 五随机, y + 五随机)
延迟 (延迟随机)
dm.数值方法 (“LeftClick”, )
延迟 (延迟随机)
dm.数值方法 (“MoveTo”, 800, 延迟随机)
延迟 (延迟随机)
.如果真结束
.计次循环尾 ()
.子程序 点击自动
.局部变量 x, 整数型
.局部变量 y, 整数型
.局部变量 回合数, 文本型
.局部变量 x1, 整数型
.局部变量 y1, 整数型
.局部变量 x2, 整数型
.局部变量 y2, 整数型
.局部变量 延迟随机, 整数型
.局部变量 三十随机, 整数型
.局部变量 十随机, 整数型
.局部变量 文字, 文本型
.局部变量 颜色, 文本型
.局部变量 自动, 整数型
置随机数种子 ()
延迟随机 = 取随机数 (100, 180)
三十随机 = 取随机数 (10, 30)
十随机 = 取随机数 (3, 10)
文字 = “回合”
颜色 = “ffffff-000000”
.循环判断首 ()
关窗执行 ()
自动 = 查找自动 (文字, 颜色)
dm.数值方法 (“FindPic”, 0, 0, 812, 637, “自动.bmp”, “000000”, 1, 0, x, y)
.如果真 (x > -1)
dm.数值方法 (“MoveTo”, x + 三十随机, y + 十随机)
延迟 (延迟随机)
dm.数值方法 (“LeftClick”, )
延迟 (延迟随机)
dm.数值方法 (“MoveTo”, 800, 延迟随机 × 2)
延迟 (延迟随机 × 2)
切换 ()
延迟 (延迟随机)
.如果真结束
.循环判断尾 (x > -1 且 自动 = 0)
.子程序 查找自动, 整数型
.参数 文字, 文本型
.参数 颜色, 文本型
.局部变量 x, 整数型
.局部变量 y, 整数型
dm.数值方法 (“FindStr”, 0, 0, 812, 637, 文字, 颜色, 1, x, y)
.如果 (x > -1)
返回 (1)
.否则
返回 (0)
.如果结束
.子程序 切换2
dm2.数值方法 (“KeyDown”, 17)
dm2.数值方法 (“KeyPress”, 9)
dm2.数值方法 (“KeyUp”, 17)
.子程序 绑定查找2
.局部变量 句柄2, 整数型
.局部变量 绑定2, 整数型
.局部变量 延迟随机2, 整数型
置随机数种子 ()
延迟随机2 = 取随机数 (2500, 3500)
句柄2 = 到整数 (游戏总句柄列表 [2])
绑定2 = dm2.数值方法 (“BindWindowEx”, 句柄2, “gdi”, “windows3”, “dx.keypad.input.lock.api|dx.keypad.state.api|dx.keypad.api”, “dx.public.graphic.protect|dx.public.km.protect|dx.public.hack.speed”, 101)
调试输出 (“线程2绑定”, 绑定2)
.判断循环首 (绑定2 > 0)
延迟 (延迟随机2)
查找点击2 ()
死亡执行2 ()
.判断循环尾 ()
.子程序 查找点击2
.局部变量 文字2, 文本型
.局部变量 颜色2, 文本型
.局部变量 图片2, 文本型
.局部变量 自动2, 整数型
' 医宝宝
文字2 = “全部医治和修复”
颜色2 = “00d011-000000”
自动2 = 查找自动2 (文字2, 颜色2)
.如果真 (自动2 = 1)
循环执行2 (文字2, 颜色2)
.如果真结束
' 领双
文字2 = “一小时”
颜色2 = “00d011-000000”
自动2 = 查找自动2 (文字2, 颜色2)
.如果真 (自动2 = 1)
循环执行2 (文字2, 颜色2)
.如果真结束
' 修装备
文字2 = “确认修理”
颜色2 = “00d011-000000”
自动2 = 查找自动2 (文字2, 颜色2)
.如果真 (自动2 = 1)
循环执行2 (文字2, 颜色2)
.如果真结束
' 住店
文字2 = “我要住店”
颜色2 = “00d011-000000”
自动2 = 查找自动2 (文字2, 颜色2)
.如果真 (自动2 = 1)
循环执行2 (文字2, 颜色2)
.如果真结束
' 关弹窗
关窗执行2 ()
' 点自动
文字2 = “回合”
颜色2 = “ffffff-000000”
自动2 = 查找自动2 (文字2, 颜色2)
.如果真 (自动2 = 0)
点击自动2 ()
.如果真结束
.子程序 循环执行2
.参数 文字2, 文本型
.参数 颜色2, 文本型
.局部变量 x, 整数型
.局部变量 y, 整数型
.局部变量 三十随机, 整数型
.局部变量 十随机, 整数型
.局部变量 五随机, 整数型
.局部变量 延迟随机, 整数型
置随机数种子 ()
延迟随机 = 取随机数 (80, 120)
三十随机 = 取随机数 (10, 30)
十随机 = 取随机数 (3, 10)
五随机 = 取随机数 (1, 5)
dm2.数值方法 (“FindStr”, 151, 297, 553, 425, 文字2, 颜色2, 1, x, y)
.循环判断首 ()
.如果真 (x > -1)
dm2.数值方法 (“MoveTo”, x + 三十随机, y + 十随机)
延迟 (延迟随机)
dm2.数值方法 (“LeftClick”, )
延迟 (延迟随机)
dm2.数值方法 (“MoveTo”, 800, 延迟随机 × 2)
延迟 (延迟随机 × 2)
切换2 ()
延迟 (延迟随机 × 2)
.如果真结束
关窗执行2 ()
dm2.数值方法 (“FindStr”, 151, 297, 553, 425, 文字2, 颜色2, 1, x, y)
调试输出 (“找字点击”, x, y)
.循环判断尾 (x > -1)
.子程序 死亡执行2
.局部变量 x, 整数型
.局部变量 y, 整数型
.局部变量 五随机, 整数型
.局部变量 延迟随机, 整数型
.局部变量 归队, 整数型
.局部变量 m, 整数型
.局部变量 暂离, 文本型
.局部变量 暂离数量, 文本型, , "0"
置随机数种子 ()
五随机 = 取随机数 (1, 5)
延迟随机 = 取随机数 (100, 200)
归队 = dm2.数值方法 (“FindStr”, 232, 59, 537, 114, “离|归”, “ffffff-000000”, 1, x, y)
.如果真 (x > -1)
暂离 = dm2.文本方法 (“FindStrEx”, 232, 59, 537, 114, “离”, “ffffff-000000”, 1, x, y)
暂离数量 = 分割文本 (暂离, “|”, )
.循环判断首 ()
归队 = dm2.数值方法 (“FindStr”, 232, 59, 537, 114, “离|归”, “ffffff-000000”, 1, x, y)
.如果真 (归队 > 0)
关窗执行2 ()
dm2.数值方法 (“MoveTo”, x + 五随机, y + 五随机)
延迟 (延迟随机)
dm2.数值方法 (“LeftClick”, )
延迟 (延迟随机)
dm2.数值方法 (“MoveTo”, 800, 延迟随机 × 2)
延迟 (延迟随机 × 2)
m = m + 1
.如果真结束
切换2 ()
延迟 (延迟随机 × 2)
.循环判断尾 (m < 到整数 (取数组成员数 (暂离数量)))
.如果真结束
.子程序 关窗执行2
.局部变量 x, 整数型
.局部变量 y, 整数型
.局部变量 五随机, 整数型
.局部变量 延迟随机, 整数型
置随机数种子 ()
五随机 = 取随机数 (1, 5)
延迟随机 = 取随机数 (200, 400)
' 找各种叉号点击
.计次循环首 (3, )
dm2.数值方法 (“FindPic”, 0, 0, 812, 637, “弹窗.bmp”, “000000”, 0.95, 0, x, y)
.如果真 (x > -1)
dm2.数值方法 (“MoveTo”, x + 五随机, y + 五随机)
延迟 (延迟随机)
dm2.数值方法 (“LeftClick”, )
延迟 (延迟随机)
dm2.数值方法 (“MoveTo”, 800, 延迟随机)
延迟 (延迟随机)
.如果真结束
dm2.数值方法 (“FindPic”, 0, 0, 812, 637, “大地图关闭.bmp|小地图关闭.bmp”, “000000”, 1, 0, x, y)
.如果真 (x > -1)
dm2.数值方法 (“MoveTo”, x + 五随机, y + 五随机)
延迟 (延迟随机)
dm2.数值方法 (“LeftClick”, )
延迟 (延迟随机)
dm2.数值方法 (“MoveTo”, 800, 延迟随机)
延迟 (延迟随机)
.如果真结束
.计次循环尾 ()
.子程序 点击自动2
.局部变量 x, 整数型
.局部变量 y, 整数型
.局部变量 回合数, 文本型
.局部变量 x1, 整数型
.局部变量 y1, 整数型
.局部变量 x2, 整数型
.局部变量 y2, 整数型
.局部变量 延迟随机, 整数型
.局部变量 三十随机, 整数型
.局部变量 十随机, 整数型
.局部变量 文字, 文本型
.局部变量 颜色, 文本型
.局部变量 自动, 整数型
置随机数种子 ()
延迟随机 = 取随机数 (100, 180)
三十随机 = 取随机数 (10, 30)
十随机 = 取随机数 (3, 10)
文字 = “回合”
颜色 = “ffffff-000000”
.循环判断首 ()
关窗执行2 ()
自动 = 查找自动2 (文字, 颜色)
dm2.数值方法 (“FindPic”, 0, 0, 812, 637, “自动.bmp”, “000000”, 1, 0, x, y)
.如果真 (x > -1)
dm2.数值方法 (“MoveTo”, x + 三十随机, y + 十随机)
延迟 (延迟随机)
dm2.数值方法 (“LeftClick”, )
延迟 (延迟随机)
dm2.数值方法 (“MoveTo”, 800, 延迟随机 × 2)
延迟 (延迟随机 × 2)
切换2 ()
延迟 (延迟随机)
.如果真结束
.循环判断尾 (x > -1 且 自动 = 0)
.子程序 查找自动2, 整数型
.参数 文字2, 文本型
.参数 颜色2, 文本型
.局部变量 x, 整数型
.局部变量 y, 整数型
dm2.数值方法 (“FindStr”, 0, 0, 812, 637, 文字2, 颜色2, 1, x, y)
.如果 (x > -1)
返回 (1)
.否则
返回 (0)
.如果结束
.子程序 切换3
dm3.数值方法 (“KeyDown”, 17)
dm3.数值方法 (“KeyPress”, 9)
dm3.数值方法 (“KeyUp”, 17)
.子程序 绑定查找3
.局部变量 句柄3, 整数型
.局部变量 绑定3, 整数型
.局部变量 延迟随机3, 整数型
置随机数种子 ()
延迟随机3 = 取随机数 (2500, 3500)
句柄3 = 到整数 (游戏总句柄列表 [3])
绑定3 = dm3.数值方法 (“BindWindowEx”, 句柄3, “gdi”, “windows3”, “dx.keypad.input.lock.api|dx.keypad.state.api|dx.keypad.api”, “dx.public.graphic.protect|dx.public.km.protect|dx.public.hack.speed”, 101)
调试输出 (“线程3绑定”, 绑定3)
.判断循环首 (绑定3 > 0)
延迟 (延迟随机3)
查找点击3 ()
死亡执行3 ()
.判断循环尾 ()
.子程序 查找点击3
.局部变量 文字, 文本型
.局部变量 颜色, 文本型
.局部变量 图片, 文本型
.局部变量 自动, 整数型
' 医宝宝
文字 = “全部医治和修复”
颜色 = “00d011-000000”
自动 = 查找自动3 (文字, 颜色)
.如果真 (自动 = 1)
循环执行3 (文字, 颜色)
.如果真结束
' 领双
文字 = “一小时”
颜色 = “00d011-000000”
自动 = 查找自动3 (文字, 颜色)
.如果真 (自动 = 1)
循环执行3 (文字, 颜色)
.如果真结束
' 修装备
文字 = “确认修理”
颜色 = “00d011-000000”
自动 = 查找自动3 (文字, 颜色)
.如果真 (自动 = 1)
循环执行3 (文字, 颜色)
.如果真结束
' 住店
文字 = “我要住店”
颜色 = “00d011-000000”
自动 = 查找自动3 (文字, 颜色)
.如果真 (自动 = 1)
循环执行3 (文字, 颜色)
.如果真结束
' 关弹窗
关窗执行3 ()
' 点自动
文字 = “回合”
颜色 = “ffffff-000000”
自动 = 查找自动3 (文字, 颜色)
.如果真 (自动 = 0)
点击自动3 ()
.如果真结束
.子程序 循环执行3
.参数 文字3, 文本型
.参数 颜色3, 文本型
.局部变量 x, 整数型
.局部变量 y, 整数型
.局部变量 三十随机, 整数型
.局部变量 十随机, 整数型
.局部变量 五随机, 整数型
.局部变量 延迟随机, 整数型
置随机数种子 ()
延迟随机 = 取随机数 (80, 120)
三十随机 = 取随机数 (10, 30)
十随机 = 取随机数 (3, 10)
五随机 = 取随机数 (1, 5)
dm3.数值方法 (“FindStr”, 151, 297, 553, 425, 文字3, 颜色3, 1, x, y)
.循环判断首 ()
.如果真 (x > -1)
dm3.数值方法 (“MoveTo”, x + 三十随机, y + 十随机)
延迟 (延迟随机)
dm3.数值方法 (“LeftClick”, )
延迟 (延迟随机)
dm3.数值方法 (“MoveTo”, 800, 延迟随机 × 2)
延迟 (延迟随机 × 2)
切换3 ()
延迟 (延迟随机 × 2)
.如果真结束
关窗执行3 ()
dm3.数值方法 (“FindStr”, 151, 297, 553, 425, 文字3, 颜色3, 1, x, y)
调试输出 (“找字点击”, x, y)
.循环判断尾 (x > -1)
.子程序 死亡执行3
.局部变量 x, 整数型
.局部变量 y, 整数型
.局部变量 五随机, 整数型
.局部变量 延迟随机, 整数型
.局部变量 归队, 整数型
.局部变量 m, 整数型
.局部变量 暂离, 文本型
.局部变量 暂离数量, 文本型, , "0"
置随机数种子 ()
五随机 = 取随机数 (1, 5)
延迟随机 = 取随机数 (100, 200)
归队 = dm3.数值方法 (“FindStr”, 232, 59, 537, 114, “离|归”, “ffffff-000000”, 1, x, y)
.如果真 (x > -1)
暂离 = dm3.文本方法 (“FindStrEx”, 232, 59, 537, 114, “离”, “ffffff-000000”, 1, x, y)
暂离数量 = 分割文本 (暂离, “|”, )
.循环判断首 ()
归队 = dm3.数值方法 (“FindStr”, 232, 59, 537, 114, “离|归”, “ffffff-000000”, 1, x, y)
.如果真 (归队 > 0)
关窗执行3 ()
dm3.数值方法 (“MoveTo”, x + 五随机, y + 五随机)
延迟 (延迟随机)
dm3.数值方法 (“LeftClick”, )
延迟 (延迟随机)
dm3.数值方法 (“MoveTo”, 800, 延迟随机 × 2)
延迟 (延迟随机 × 2)
m = m + 1
.如果真结束
切换3 ()
延迟 (延迟随机 × 2)
.循环判断尾 (m < 到整数 (取数组成员数 (暂离数量)))
.如果真结束
.子程序 关窗执行3
.局部变量 x, 整数型
.局部变量 y, 整数型
.局部变量 五随机, 整数型
.局部变量 延迟随机, 整数型
置随机数种子 ()
五随机 = 取随机数 (1, 5)
延迟随机 = 取随机数 (200, 400)
' 找各种叉号点击
.计次循环首 (3, )
dm3.数值方法 (“FindPic”, 0, 0, 812, 637, “弹窗.bmp”, “000000”, 0.95, 0, x, y)
.如果真 (x > -1)
dm3.数值方法 (“MoveTo”, x + 五随机, y + 五随机)
延迟 (延迟随机)
dm3.数值方法 (“LeftClick”, )
延迟 (延迟随机)
dm3.数值方法 (“MoveTo”, 800, 延迟随机)
延迟 (延迟随机)
.如果真结束
dm3.数值方法 (“FindPic”, 0, 0, 812, 637, “大地图关闭.bmp|小地图关闭.bmp”, “000000”, 1, 0, x, y)
.如果真 (x > -1)
dm3.数值方法 (“MoveTo”, x + 五随机, y + 五随机)
延迟 (延迟随机)
dm3.数值方法 (“LeftClick”, )
延迟 (延迟随机)
dm3.数值方法 (“MoveTo”, 800, 延迟随机)
延迟 (延迟随机)
.如果真结束
.计次循环尾 ()
.子程序 点击自动3
.局部变量 x, 整数型
.局部变量 y, 整数型
.局部变量 回合数, 文本型
.局部变量 x1, 整数型
.局部变量 y1, 整数型
.局部变量 x2, 整数型
.局部变量 y2, 整数型
.局部变量 延迟随机, 整数型
.局部变量 三十随机, 整数型
.局部变量 十随机, 整数型
.局部变量 文字, 文本型
.局部变量 颜色, 文本型
.局部变量 自动, 整数型
置随机数种子 ()
延迟随机 = 取随机数 (100, 180)
三十随机 = 取随机数 (10, 30)
十随机 = 取随机数 (3, 10)
文字 = “回合”
颜色 = “ffffff-000000”
.循环判断首 ()
关窗执行3 ()
自动 = 查找自动3 (文字, 颜色)
dm3.数值方法 (“FindPic”, 0, 0, 812, 637, “自动.bmp”, “000000”, 1, 0, x, y)
.如果真 (x > -1)
dm3.数值方法 (“MoveTo”, x + 三十随机, y + 十随机)
延迟 (延迟随机)
dm3.数值方法 (“LeftClick”, )
延迟 (延迟随机)
dm3.数值方法 (“MoveTo”, 800, 延迟随机 × 2)
延迟 (延迟随机 × 2)
切换3 ()
延迟 (延迟随机)
.如果真结束
.循环判断尾 (x > -1 且 自动 = 0)
.子程序 查找自动3, 整数型
.参数 文字3, 文本型
.参数 颜色3, 文本型
.局部变量 x, 整数型
.局部变量 y, 整数型
dm3.数值方法 (“FindStr”, 0, 0, 812, 637, 文字3, 颜色3, 1, x, y)
.如果 (x > -1)
返回 (1)
.否则
返回 (0)
.如果结束
.子程序 切换4
dm4.数值方法 (“KeyDown”, 17)
dm4.数值方法 (“KeyPress”, 9)
dm4.数值方法 (“KeyUp”, 17)
.子程序 绑定查找4
.局部变量 句柄4, 整数型
.局部变量 绑定4, 整数型
.局部变量 延迟随机4, 整数型
置随机数种子 ()
延迟随机4 = 取随机数 (2500, 3500)
句柄4 = 到整数 (游戏总句柄列表 [4])
绑定4 = dm4.数值方法 (“BindWindowEx”, 句柄4, “gdi”, “windows3”, “dx.keypad.input.lock.api|dx.keypad.state.api|dx.keypad.api”, “dx.public.graphic.protect|dx.public.km.protect|dx.public.hack.speed”, 101)
调试输出 (“线程4绑定”, 绑定4)
.判断循环首 (绑定4 > 0)
延迟 (延迟随机4)
查找点击4 ()
死亡执行4 ()
.判断循环尾 ()
.子程序 查找点击4
.局部变量 文字, 文本型
.局部变量 颜色, 文本型
.局部变量 图片, 文本型
.局部变量 自动, 整数型
' 医宝宝
文字 = “全部医治和修复”
颜色 = “00d011-000000”
自动 = 查找自动4 (文字, 颜色)
.如果真 (自动 = 1)
循环执行4 (文字, 颜色)
.如果真结束
' 领双
文字 = “一小时”
颜色 = “00d011-000000”
自动 = 查找自动4 (文字, 颜色)
.如果真 (自动 = 1)
循环执行4 (文字, 颜色)
.如果真结束
' 修装备
文字 = “确认修理”
颜色 = “00d011-000000”
自动 = 查找自动4 (文字, 颜色)
.如果真 (自动 = 1)
循环执行4 (文字, 颜色)
.如果真结束
' 住店
文字 = “我要住店”
颜色 = “00d011-000000”
自动 = 查找自动4 (文字, 颜色)
.如果真 (自动 = 1)
循环执行4 (文字, 颜色)
.如果真结束
' 关弹窗
关窗执行4 ()
' 点自动
文字 = “回合”
颜色 = “ffffff-000000”
自动 = 查找自动4 (文字, 颜色)
.如果真 (自动 = 0)
点击自动4 ()
.如果真结束
.子程序 循环执行4
.参数 文字4, 文本型
.参数 颜色4, 文本型
.局部变量 x, 整数型
.局部变量 y, 整数型
.局部变量 三十随机, 整数型
.局部变量 十随机, 整数型
.局部变量 五随机, 整数型
.局部变量 延迟随机, 整数型
置随机数种子 ()
延迟随机 = 取随机数 (80, 120)
三十随机 = 取随机数 (10, 30)
十随机 = 取随机数 (3, 10)
五随机 = 取随机数 (1, 5)
dm4.数值方法 (“FindStr”, 151, 297, 553, 425, 文字4, 颜色4, 1, x, y)
.循环判断首 ()
.如果真 (x > -1)
dm4.数值方法 (“MoveTo”, x + 三十随机, y + 十随机)
延迟 (延迟随机)
dm4.数值方法 (“LeftClick”, )
延迟 (延迟随机)
dm4.数值方法 (“MoveTo”, 800, 延迟随机 × 2)
延迟 (延迟随机 × 2)
切换4 ()
延迟 (延迟随机 × 2)
.如果真结束
关窗执行4 ()
dm4.数值方法 (“FindStr”, 151, 297, 553, 425, 文字4, 颜色4, 1, x, y)
调试输出 (“找字点击”, x, y)
.循环判断尾 (x > -1)
.子程序 死亡执行4
.局部变量 x, 整数型
.局部变量 y, 整数型
.局部变量 五随机, 整数型
.局部变量 延迟随机, 整数型
.局部变量 归队, 整数型
.局部变量 m, 整数型
.局部变量 暂离, 文本型
.局部变量 暂离数量, 文本型, , "0"
置随机数种子 ()
五随机 = 取随机数 (1, 5)
延迟随机 = 取随机数 (100, 200)
归队 = dm4.数值方法 (“FindStr”, 232, 59, 537, 114, “离|归”, “ffffff-000000”, 1, x, y)
.如果真 (x > -1)
暂离 = dm4.文本方法 (“FindStrEx”, 232, 59, 537, 114, “离”, “ffffff-000000”, 1, x, y)
暂离数量 = 分割文本 (暂离, “|”, )
.循环判断首 ()
归队 = dm4.数值方法 (“FindStr”, 232, 59, 537, 114, “离|归”, “ffffff-000000”, 1, x, y)
.如果真 (归队 > 0)
关窗执行4 ()
dm4.数值方法 (“MoveTo”, x + 五随机, y + 五随机)
延迟 (延迟随机)
dm4.数值方法 (“LeftClick”, )
延迟 (延迟随机)
dm4.数值方法 (“MoveTo”, 800, 延迟随机 × 2)
延迟 (延迟随机 × 2)
m = m + 1
.如果真结束
切换4 ()
延迟 (延迟随机 × 2)
.循环判断尾 (m < 到整数 (取数组成员数 (暂离数量)))
.如果真结束
.子程序 关窗执行4
.局部变量 x, 整数型
.局部变量 y, 整数型
.局部变量 五随机, 整数型
.局部变量 延迟随机, 整数型
置随机数种子 ()
五随机 = 取随机数 (1, 5)
延迟随机 = 取随机数 (200, 400)
' 找各种叉号点击
.计次循环首 (3, )
dm4.数值方法 (“FindPic”, 0, 0, 812, 637, “弹窗.bmp”, “000000”, 0.95, 0, x, y)
.如果真 (x > -1)
dm4.数值方法 (“MoveTo”, x + 五随机, y + 五随机)
延迟 (延迟随机)
dm4.数值方法 (“LeftClick”, )
延迟 (延迟随机)
dm4.数值方法 (“MoveTo”, 800, 延迟随机)
延迟 (延迟随机)
.如果真结束
dm4.数值方法 (“FindPic”, 0, 0, 812, 637, “大地图关闭.bmp|小地图关闭.bmp”, “000000”, 1, 0, x, y)
.如果真 (x > -1)
dm4.数值方法 (“MoveTo”, x + 五随机, y + 五随机)
延迟 (延迟随机)
dm4.数值方法 (“LeftClick”, )
延迟 (延迟随机)
dm4.数值方法 (“MoveTo”, 800, 延迟随机)
延迟 (延迟随机)
.如果真结束
.计次循环尾 ()
.子程序 点击自动4
.局部变量 x, 整数型
.局部变量 y, 整数型
.局部变量 回合数, 文本型
.局部变量 x1, 整数型
.局部变量 y1, 整数型
.局部变量 x2, 整数型
.局部变量 y2, 整数型
.局部变量 延迟随机, 整数型
.局部变量 三十随机, 整数型
.局部变量 十随机, 整数型
.局部变量 文字, 文本型
.局部变量 颜色, 文本型
.局部变量 自动, 整数型
置随机数种子 ()
延迟随机 = 取随机数 (100, 180)
三十随机 = 取随机数 (10, 30)
十随机 = 取随机数 (3, 10)
文字 = “回合”
颜色 = “ffffff-000000”
.循环判断首 ()
关窗执行4 ()
自动 = 查找自动4 (文字, 颜色)
dm4.数值方法 (“FindPic”, 0, 0, 812, 637, “自动.bmp”, “000000”, 1, 0, x, y)
.如果真 (x > -1)
dm4.数值方法 (“MoveTo”, x + 三十随机, y + 十随机)
延迟 (延迟随机)
dm4.数值方法 (“LeftClick”, )
延迟 (延迟随机)
dm4.数值方法 (“MoveTo”, 800, 延迟随机 × 2)
延迟 (延迟随机 × 2)
切换4 ()
延迟 (延迟随机)
.如果真结束
.循环判断尾 (x > -1 且 自动 = 0)
.子程序 查找自动4, 整数型
.参数 文字4, 文本型
.参数 颜色4, 文本型
.局部变量 x, 整数型
.局部变量 y, 整数型
dm4.数值方法 (“FindStr”, 0, 0, 812, 637, 文字4, 颜色4, 1, x, y)
.如果 (x > -1)
返回 (1)
.否则
返回 (0)
.如果结束
.子程序 切换5
dm5.数值方法 (“KeyDown”, 17)
dm5.数值方法 (“KeyPress”, 9)
dm5.数值方法 (“KeyUp”, 17)
.子程序 绑定查找5
.局部变量 句柄5, 整数型
.局部变量 绑定5, 整数型
.局部变量 延迟随机5, 整数型
置随机数种子 ()
延迟随机5 = 取随机数 (2500, 3500)
句柄5 = 到整数 (游戏总句柄列表 [5])
绑定5 = dm5.数值方法 (“BindWindowEx”, 句柄5, “gdi”, “windows3”, “dx.keypad.input.lock.api|dx.keypad.state.api|dx.keypad.api”, “dx.public.graphic.protect|dx.public.km.protect|dx.public.hack.speed”, 101)
调试输出 (“线程5绑定”, 绑定5)
.判断循环首 (绑定5 > 0)
延迟 (延迟随机5)
查找点击5 ()
死亡执行5 ()
.判断循环尾 ()
.子程序 查找点击5
.局部变量 文字, 文本型
.局部变量 颜色, 文本型
.局部变量 图片, 文本型
.局部变量 自动, 整数型
' 医宝宝
文字 = “全部医治和修复”
颜色 = “00d011-000000”
自动 = 查找自动5 (文字, 颜色)
.如果真 (自动 = 1)
循环执行5 (文字, 颜色)
.如果真结束
' 领双
文字 = “一小时”
颜色 = “00d011-000000”
自动 = 查找自动5 (文字, 颜色)
.如果真 (自动 = 1)
循环执行5 (文字, 颜色)
.如果真结束
' 修装备
文字 = “确认修理”
颜色 = “00d011-000000”
自动 = 查找自动5 (文字, 颜色)
.如果真 (自动 = 1)
循环执行5 (文字, 颜色)
.如果真结束
' 住店
文字 = “我要住店”
颜色 = “00d011-000000”
自动 = 查找自动5 (文字, 颜色)
.如果真 (自动 = 1)
循环执行5 (文字, 颜色)
.如果真结束
' 关弹窗
关窗执行5 ()
' 点自动
文字 = “回合”
颜色 = “ffffff-000000”
自动 = 查找自动5 (文字, 颜色)
.如果真 (自动 = 0)
点击自动5 ()
.如果真结束
.子程序 循环执行5
.参数 文字5, 文本型
.参数 颜色5, 文本型
.局部变量 x, 整数型
.局部变量 y, 整数型
.局部变量 三十随机, 整数型
.局部变量 十随机, 整数型
.局部变量 五随机, 整数型
.局部变量 延迟随机, 整数型
置随机数种子 ()
延迟随机 = 取随机数 (80, 120)
三十随机 = 取随机数 (10, 30)
十随机 = 取随机数 (3, 10)
五随机 = 取随机数 (1, 5)
dm5.数值方法 (“FindStr”, 151, 297, 553, 425, 文字5, 颜色5, 1, x, y)
.循环判断首 ()
.如果真 (x > -1)
dm5.数值方法 (“MoveTo”, x + 三十随机, y + 十随机)
延迟 (延迟随机)
dm5.数值方法 (“LeftClick”, )
延迟 (延迟随机)
dm5.数值方法 (“MoveTo”, 800, 延迟随机 × 2)
延迟 (延迟随机 × 2)
切换5 ()
延迟 (延迟随机 × 2)
.如果真结束
' *** 缩略程序块 ***
关窗执行5 ()
dm5.数值方法 (“FindStr”, 151, 297, 553, 425, 文字5, 颜色5, 1, x, y)
调试输出 (“找字点击”, x, y)
.循环判断尾 (x > -1)
.子程序 死亡执行5
.局部变量 x, 整数型
.局部变量 y, 整数型
.局部变量 五随机, 整数型
.局部变量 延迟随机, 整数型
.局部变量 归队, 整数型
.局部变量 m, 整数型
.局部变量 暂离, 文本型
.局部变量 暂离数量, 文本型, , "0"
置随机数种子 ()
五随机 = 取随机数 (1, 5)
延迟随机 = 取随机数 (100, 200)
归队 = dm5.数值方法 (“FindStr”, 232, 59, 537, 114, “离|归”, “ffffff-000000”, 1, x, y)
.如果真 (x > -1)
暂离 = dm5.文本方法 (“FindStrEx”, 232, 59, 537, 114, “离”, “ffffff-000000”, 1, x, y)
暂离数量 = 分割文本 (暂离, “|”, )
.循环判断首 ()
归队 = dm5.数值方法 (“FindStr”, 232, 59, 537, 114, “离|归”, “ffffff-000000”, 1, x, y)
.如果真 (归队 > 0)
关窗执行5 ()
dm5.数值方法 (“MoveTo”, x + 五随机, y + 五随机)
延迟 (延迟随机)
dm5.数值方法 (“LeftClick”, )
延迟 (延迟随机)
dm5.数值方法 (“MoveTo”, 800, 延迟随机 × 2)
延迟 (延迟随机 × 2)
m = m + 1
.如果真结束
切换5 ()
延迟 (延迟随机 × 2)
.循环判断尾 (m < 到整数 (取数组成员数 (暂离数量)))
.如果真结束
.子程序 关窗执行5
.局部变量 x, 整数型
.局部变量 y, 整数型
.局部变量 五随机, 整数型
.局部变量 延迟随机, 整数型
置随机数种子 ()
五随机 = 取随机数 (1, 5)
延迟随机 = 取随机数 (200, 400)
' *** 缩略程序块 ***
' 找各种叉号点击
.计次循环首 (3, )
dm5.数值方法 (“FindPic”, 0, 0, 812, 637, “弹窗.bmp”, “000000”, 0.95, 0, x, y)
.如果真 (x > -1)
dm5.数值方法 (“MoveTo”, x + 五随机, y + 五随机)
延迟 (延迟随机)
' *** 缩略程序块 ***
dm5.数值方法 (“LeftClick”, )
延迟 (延迟随机)
dm5.数值方法 (“MoveTo”, 800, 延迟随机)
延迟 (延迟随机)
.如果真结束
dm5.数值方法 (“FindPic”, 0, 0, 812, 637, “大地图关闭.bmp|小地图关闭.bmp”, “000000”, 1, 0, x, y)
.如果真 (x > -1)
dm5.数值方法 (“MoveTo”, x + 五随机, y + 五随机)
延迟 (延迟随机)
dm5.数值方法 (“LeftClick”, )
延迟 (延迟随机)
dm5.数值方法 (“MoveTo”, 800, 延迟随机)
延迟 (延迟随机)
.如果真结束
.计次循环尾 ()
.子程序 点击自动5
.局部变量 x, 整数型
.局部变量 y, 整数型
.局部变量 回合数, 文本型
.局部变量 x1, 整数型
.局部变量 y1, 整数型
.局部变量 x2, 整数型
.局部变量 y2, 整数型
.局部变量 延迟随机, 整数型
.局部变量 三十随机, 整数型
.局部变量 十随机, 整数型
.局部变量 文字, 文本型
.局部变量 颜色, 文本型
.局部变量 自动, 整数型
置随机数种子 ()
延迟随机 = 取随机数 (100, 180)
三十随机 = 取随机数 (10, 30)
十随机 = 取随机数 (3, 10)
文字 = “回合”
颜色 = “ffffff-000000”
.循环判断首 ()
关窗执行5 ()
自动 = 查找自动5 (文字, 颜色)
dm5.数值方法 (“FindPic”, 0, 0, 812, 637, “自动.bmp”, “000000”, 1, 0, x, y)
.如果真 (x > -1)
dm5.数值方法 (“MoveTo”, x + 三十随机, y + 十随机)
延迟 (延迟随机)
dm5.数值方法 (“LeftClick”, )
延迟 (延迟随机)
dm5.数值方法 (“MoveTo”, 800, 延迟随机 × 2)
延迟 (延迟随机 × 2)
切换5 ()
延迟 (延迟随机)
.如果真结束
.循环判断尾 (x > -1 且 自动 = 0)
.子程序 查找自动5, 整数型
.参数 文字5, 文本型
.参数 颜色5, 文本型
.局部变量 x, 整数型
.局部变量 y, 整数型
dm5.数值方法 (“FindStr”, 0, 0, 812, 637, 文字5, 颜色5, 1, x, y)
.如果 (x > -1)
返回 (1)
.否则
返回 (0)
.如果结束
|
|