上古之力吊炸天 发表于 2017-12-19 20:51:12

荒野行动源码【木有用了】

本帖最后由 上古之力吊炸天 于 2018-8-20 17:30 编辑

回复也不能告诉你什么
这是楼主自己从小刀整理出来的

上古之力吊炸天 发表于 2017-12-19 20:53:07

如此帅的我必须占了一楼

上古之力吊炸天 发表于 2017-12-19 20:54:56

本帖最后由 上古之力吊炸天 于 2017-12-19 21:09 编辑

.版本 2
.支持库 iext

.程序集 窗口程序集_窗口1
.程序集变量 a, 整数型
.程序集变量 b, 整数型
.程序集变量 顶点, 坐标型
.程序集变量 临时宽度, 整数型
.程序集变量 临时高度, 整数型
.程序集变量 横坐标, 文本型
.程序集变量 纵坐标, 文本型
.程序集变量 游戏宽度, 文本型
.程序集变量 游戏高度, 文本型
.程序集变量 句柄, 整数型
.程序集变量 c, 整数型
.程序集变量 游戏PID, 整数型
.程序集变量 HWND, 整数型
.程序集变量 高, 整数型
.程序集变量 宽, 整数型
.程序集变量 Dm, 大漠类
.程序集变量 X, 整数型
.程序集变量 Y, 整数型
.程序集变量 X1, 整数型
.程序集变量 Y1, 整数型
.程序集变量 上色一级偏移, 整数型
.程序集变量 上色二级偏移, 整数型
.程序集变量 上色三级偏移, 整数型
.程序集变量 上色四级偏移, 整数型
.程序集变量 上色基址, 整数型

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

可视 = 真
Dm.初始化 (取运行目录 () + “\dm.dll”)
.如果 (进程是否存在 (“hyxd.exe”))
    GO ()
    菜单载入 ()
.否则
    信息框 (“请先启动游戏”, 0, , )

.如果结束
游戏PID = 取进程ID (“hyxd.exe”)
窗口透明化 (_启动窗口.取窗口句柄 (), 255, #透明, 真)
时钟2.时钟周期 = 1
时钟3.时钟周期 = 1000
热键 ()


.子程序 热键

监视热键 (&人物穿墙, #F4键)
监视热键 (&人物飞天, #F5键)
监视热键 (&子弹追踪, #F1键)
监视热键 (&自动瞄准, #F2键)
监视热键 (&停止, #F3键)
监视热键 (&隐藏呼出, #Home键)
米锘_驱动注入DLL (“hyxd.exe”, #dll)

.子程序 隐藏呼出

.如果 (_启动窗口.可视 = 真)
    _启动窗口.总在最前 = 假

    _启动窗口.可视 = 假
.否则
    _启动窗口.可视 = 真
    _启动窗口.总在最前 = 真
.如果结束


.子程序 自动瞄准

窗口最大化 (句柄)
高 = 取窗口高度 (句柄)
宽 = 取窗口宽度 (句柄)
X = 宽 ÷ 2 - 30
Y = 高 ÷ 2 - 50
X1 = X + 60
Y1 = Y + 100
时钟4.时钟周期 = 1
游戏PID = 取进程ID (“hyxd.exe”)
上色基址 = 读模块基址 (游戏PID, “hyxd.exe”, “1AB6678”)
上色一级偏移 = 读整数型 (上色基址) + 172
上色二级偏移 = 读整数型 (上色一级偏移) + 224
上色三级偏移 = 读整数型 (上色二级偏移) + 12
上色四级偏移 = 读整数型 (上色三级偏移) + 4
写整数型 (读整数型 (上色四级偏移) + 224, 1134985216)
自动瞄准.标题 = “开启”

.子程序 _时钟4_周期事件
.局部变量 X2, 整数型
.局部变量 Y2, 整数型
.局部变量 S, 文本型
.局部变量 分割, 文本型, , "0"

S = Dm.FindColorE (X, Y, X1, Y1, “FF3731-001615”, 1, 6)
分割 = 分割文本 (S, “|”, )
X2 = 到整数 (分割 )
Y2 = 到整数 (分割 )
.如果真 (X2 ≠ -1 且 Y2 ≠ -1)
    Dm.鼠标_相对移动 ((宽 ÷ 2 - X2) × -0.25, (高 ÷ 2 - Y2) × -0.25)
.如果真结束
' 输出调试文本 (“X” + 到文本 (取鼠标水平位置 ()) + “Y” + 到文本 (取鼠标垂直位置 ()))

.子程序 停止

时钟4.时钟周期 = 0
写整数型 (读整数型 (上色四级偏移) + 224, 1065353216)
自动瞄准.标题 = “关闭”


.子程序 子弹追踪
.局部变量 上色基址, 整数型

.如果 (子弹追踪.标题 = “关闭”)
    上色基址 = 追风_取模块句柄 (游戏PID, “hyxd.exe”) + 十六到十 (“4F9CB2”)
    写内存整数型 (游戏PID, 上色基址, 3260616691)
    上色基址 = 追风_取模块句柄 (游戏PID, “hyxd.exe”) + 十六到十 (“4F9CD1”)
    写内存整数型 (游戏PID, 上色基址, 3260616691)
    上色基址 = 追风_取模块句柄 (游戏PID, “hyxd.exe”) + 十六到十 (“4F9Cc0”)
    写内存整数型 (游戏PID, 上色基址, 3260616691)
    ' 写内存小数型 (游戏PID, 上色基址 + 十六到十 (“E44CE0AC”), 30)
    子弹追踪.标题 = “开启”
.否则
    ' 上色基址 = 追风_取模块句柄 (游戏PID, “hyxd.exe”) + 十六到十 (“1610630”)
    ' 写内存双精度小数型 (游戏PID, 上色基址, 1000)
    子弹追踪.标题 = “关闭”
.如果结束


.子程序 人物变蓝
.局部变量 上色基址, 整数型
.局部变量 上色一级偏移, 整数型
.局部变量 上色二级偏移, 整数型
.局部变量 上色三级偏移, 整数型
.局部变量 上色四级偏移, 整数型

上色基址 = 读模块基址 (游戏PID, “hyxd.exe”, “1AB6678”)
上色一级偏移 = 读整数型 (上色基址) + 172
上色二级偏移 = 读整数型 (上色一级偏移) + 224
上色三级偏移 = 读整数型 (上色二级偏移) + 12
上色四级偏移 = 读整数型 (上色三级偏移) + 4
.如果 (人物变蓝.标题 = “关闭”)
    写整数型 (读整数型 (上色四级偏移) + 232, 1134985216)
    人物变蓝.标题 = “开启”
.否则
    写整数型 (读整数型 (上色四级偏移) + 232, 1065353216)
    人物变蓝.标题 = “关闭”
.如果结束



.子程序 视角变大
.局部变量 上色基址, 整数型

.如果 (视角变大.标题 = “关闭”)
    上色基址 = 追风_取模块句柄 (游戏PID, “hyxd.exe”) + 十六到十 (“162B544”)
    写内存整数型 (游戏PID, 上色基址, 3217870029)
    ' 写内存小数型 (游戏PID, 上色基址 + 十六到十 (“E44CE0AC”), 30)
    视角变大.标题 = “开启”
.否则
    ' 上色基址 = 追风_取模块句柄 (游戏PID, “hyxd.exe”) + 十六到十 (“1610630”)
    ' 写内存双精度小数型 (游戏PID, 上色基址, 1000)
    视角变大.标题 = “关闭”
.如果结束


.子程序 人物飞天

.如果 (人物飞天.标题 = “关闭”)
    写内存整数型 (取进程ID (“hyxd.exe”), 追风_取模块句柄 (取进程ID (“hyxd.exe”), “hyxd.exe”) + 4779648, 5011587)
    人物飞天.标题 = “开启”
.否则
    写内存整数型 (取进程ID (“hyxd.exe”), 追风_取模块句柄 (取进程ID (“hyxd.exe”), “hyxd.exe”) + 4779648, 21788803)
    人物飞天.标题 = “关闭”
.如果结束


.子程序 人物蓝色
.局部变量 上色基址, 整数型
.局部变量 上色一级偏移, 整数型
.局部变量 上色二级偏移, 整数型
.局部变量 上色三级偏移, 整数型
.局部变量 上色四级偏移, 整数型

上色基址 = 读模块基址 (游戏PID, “hyxd.exe”, “1AB6678”)
上色一级偏移 = 读整数型 (上色基址) + 172
上色二级偏移 = 读整数型 (上色一级偏移) + 224
上色三级偏移 = 读整数型 (上色二级偏移) + 12
上色四级偏移 = 读整数型 (上色三级偏移) + 4
.如果 (人物蓝色.标题 = “关闭”)
    写整数型 (读整数型 (上色四级偏移) + 224, 1134985216)
    人物蓝色.标题 = “开启”
.否则
    写整数型 (读整数型 (上色四级偏移) + 224, 1065353216)
    人物蓝色.标题 = “关闭”
.如果结束




.子程序 人物上色
.局部变量 上色基址, 整数型
.局部变量 上色一级偏移, 整数型
.局部变量 上色二级偏移, 整数型
.局部变量 上色三级偏移, 整数型
.局部变量 上色四级偏移, 整数型

上色基址 = 读模块基址 (游戏PID, “hyxd.exe”, “1AB6678”)
上色一级偏移 = 读整数型 (上色基址) + 172
上色二级偏移 = 读整数型 (上色一级偏移) + 224
上色三级偏移 = 读整数型 (上色二级偏移) + 12
上色四级偏移 = 读整数型 (上色三级偏移) + 4
.如果 (人物上色.标题 = “关闭”)
    写整数型 (读整数型 (上色四级偏移) + 236, 1134985216)
    人物上色.标题 = “开启”
.否则
    写整数型 (读整数型 (上色四级偏移) + 236, 1065353216)
    人物上色.标题 = “关闭”
.如果结束


.子程序 全局加速
.局部变量 加速基址, 整数型

.如果 (全局加速.标题 = “×”)
    加速基址 = 读模块基址 (游戏PID, “hyxd.exe”) + 十六到十 (“16317F0”)
    写内存双精度小数型 (游戏PID, 加速基址, 450)
    全局加速.标题 = “√”
.否则
    加速基址 = 读模块基址 (游戏PID, “hyxd.exe”) + 十六到十 (“16317F0”)
    写内存双精度小数型 (游戏PID, 加速基址, 1000)
    全局加速.标题 = “×”
.如果结束


.子程序 人物加速
.局部变量 上色基址, 整数型

.如果 (人物加速.标题 = “×”)
    上色基址 = 追风_取模块句柄 (游戏PID, “hyxd.exe”) + 十六到十 (“1610630”)
    写内存小数型 (游戏PID, 上色基址, 3000)
    ' 写内存小数型 (游戏PID, 上色基址 + 十六到十 (“E44CE0AC”), 30)
    人物加速.标题 = “√”
.否则
    上色基址 = 追风_取模块句柄 (游戏PID, “hyxd.exe”) + 十六到十 (“1610630”)
    写内存双精度小数型 (游戏PID, 上色基址, 1000)
    人物加速.标题 = “×”
.如果结束



.子程序 人物穿墙
.局部变量 穿墙基址, 整数型

.如果 (人物穿墙.标题 = “关闭”)
    穿墙基址 = 追风_取模块句柄 (游戏PID, “hyxd.exe”) + 十六到十 (“13D21D8”)
    写内存整数型 (游戏PID, 穿墙基址, 2320291343)
    人物穿墙.标题 = “开启”
.否则
    穿墙基址 = 追风_取模块句柄 (游戏PID, “hyxd.exe”) + 十六到十 (“13D21D7”)
    写内存整数型 (游戏PID, 穿墙基址, 1154879334)
    人物穿墙.标题 = “关闭”
.如果结束


.子程序 隐藏

.如果 (_启动窗口.可视 = 真)
    _启动窗口.总在最前 = 假
    内存优化 (-1)
    _启动窗口.可视 = 假
.否则

.如果结束


.子程序 呼出

.如果 (_启动窗口.可视 = 假)
    _启动窗口.总在最前 = 真
    内存优化 (-1)
    _启动窗口.可视 = 真
.否则

.如果结束


.子程序 _时钟1_周期事件

顶点 = 取窗口内顶点 (句柄)
横坐标 = 到文本 (顶点.x)
纵坐标 = 到文本 (顶点.y)
取窗口内大小 (句柄, 临时宽度, 临时高度)
游戏宽度 = 到文本 (临时宽度)
游戏高度 = 到文本 (临时高度)
左边 = 到整数 (横坐标) + 到整数 (游戏宽度) - 1320
顶边 = 到整数 (纵坐标) + 40
_启动窗口.总在最前 = 真


.子程序 _时钟2_周期事件

句柄 = 取句柄 (“hyxd.exe”)
.如果 (句柄 = -1)
    时钟1.时钟周期 = 0
    _启动窗口.可视 = 假
.否则
    时钟1.时钟周期 = 1
    _启动窗口.可视 = 真
.如果结束
.如果 (进程是否存在 (“hyxd.exe”))
    时钟2.时钟周期 = 0
.否则
    _启动窗口.销毁 ()
.如果结束


.子程序 _时钟3_周期事件

更改标题 (取句柄 (“hyxd.exe”, “Messiah_Game”), “【欢迎使用蝙蝠侠3.0】您现在已经运行了;” + 到文本 (c) + “ 小时 ” + 到文本 (b) + “ 分钟 ” + 到文本 (a) + “ 秒”)
_启动窗口.左边 = 取窗口内左边 (HWND) + 1
_启动窗口.顶边 = 取窗口内顶边 (HWND) + 210
.如果真 (进程是否存在 (“HYXD.EXE”) = 假)
    结束 ()
.如果真结束


.子程序 写整数型
.参数 地址, 整数型
.参数 数值, 整数型

写内存整数型 (游戏PID, 地址, 数值)


.子程序 读整数型, 整数型
.参数 地址, 整数型

返回 (读内存整数型 (游戏PID, 地址))

.子程序 _外形框1_鼠标左键被按下, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型



.子程序 _子弹追踪_鼠标左键被按下, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型

没有模块支持库的你抄了也没任何卵用

2516 发表于 2017-12-19 21:06:37

额,看不懂在说神马~@_@

战霆 发表于 2017-12-20 06:35:59

啥也不说了,感谢楼主分享哇!

的点点滴滴 发表于 2017-12-20 17:27:46

小夜风 发表于 2017-12-20 18:28:11

正需要,支持楼主大人了!

帅没罪 发表于 2017-12-21 15:40:40

正需要,支持楼主大人了!

Lyxwan 发表于 2017-12-21 16:05:26

啥也不说了,感谢楼主分享哇!

唐堂ˇ 发表于 2017-12-21 20:59:56

珍惜生命,果断回帖。

cherr 发表于 2017-12-22 12:06:58

。。。。。。。。。

奥利给 发表于 2017-12-22 18:08:53

变大代码是什么

笑然 发表于 2017-12-22 19:23:28

么有分,谁能送我点积分啊::>_<::

上古之力吊炸天 发表于 2017-12-22 19:40:08

回的人少,我来小顶一下

chentao520 发表于 2017-12-22 19:41:38

啥也不说了,感谢楼主分享哇!
页: [1] 2 3 4 5 6 7 8
查看完整版本: 荒野行动源码【木有用了】