[Asm] 纯文本查看 复制代码
.版本 2
.支持库 spec
.程序集 窗口程序集_启动窗口
.程序集变量 CSGO窗口句柄, 整数型
.程序集变量 内存数据, 文本型
.程序集变量 客户端类模块, 整数型
.程序集变量 进程ID, 整数型
.程序集变量 基址, 整数型
.程序集变量 PID, 整数型
.程序集变量 人物基址群, 整数型
.程序集变量 人物基地址群, 整数型, , "10"
.程序集变量 人物属性数组, 整数型, , "5"
.程序集变量 句柄, 整数型
.程序集变量 客户, 文本型
.子程序 __启动窗口_创建完毕
CSGO窗口句柄 = 窗口_取句柄 (, , “Valve001”, “Counter-Strike: Global Offensive”)
.子程序 _按钮1_被单击
PID = 进程_名取ID (“csgo.exe”, )
客户端类模块 = 追风_取模块句柄 (PID, “client_panorama.dll”)
线程_启动 (&子程序1, , 句柄)
按钮1.禁止 = 真
.子程序 _按钮2_被单击
结束 ()
.子程序 子程序1
.循环判断首 ()
取三维坐标 ()
.循环判断尾 (真)
.子程序 取三维坐标
.局部变量 人物数据, 文本型
.局部变量 本人地址对象, 整数型
.局部变量 锚1, 整数型
.局部变量 锚2, 整数型
.局部变量 人物X, 整数型
.局部变量 人物Y, 整数型
.局部变量 人物血量, 整数型
.局部变量 人物阵营, 整数型
.局部变量 json, 类_json, , "2"
.局部变量 Json待发送, 文本型
.局部变量 锚3, 整数型
锚2 = 0
.计次循环首 (取数组成员数 (人物基地址群), 锚1)
锚3 = 0
.判断开始 (锚1 = 2)
人物基地址群 [锚1] = 内存.读整数 (PID, 客户端类模块 + 进制_十六到十 (“0D27AAC”))
锚3 = 1
.默认
人物基地址群 [锚1] = 内存.读整数 (PID, 客户端类模块 + 进制_十六到十 (“4D3B69C”) + 锚2)
.判断结束
' 调试输出 (进制_十到十六 (人物基地址群 [锚1]))
锚2 = 锚2 + 16
人物X = 内存.读小数 (PID, 人物基地址群 [锚1] + 进制_十六到十 (“B0”))
人物Y = 内存.读小数 (PID, 人物基地址群 [锚1] + 进制_十六到十 (“AC”))
人物血量 = 内存.读整数 (PID, 人物基地址群 [锚1] + 进制_十六到十 (“100”))
人物阵营 = 内存.读整数 (PID, 人物基地址群 [锚1] + 进制_十六到十 (“F4”))
json [2].置属性 (“人物X”, 到文本 (人物X))
json [2].置属性 (“人物Y”, 到文本 (人物Y))
json [2].置属性 (“人物血量”, 到文本 (人物血量))
json [2].置属性 (“人物阵营”, 到文本 (人物阵营))
json [2].置属性 (“是否为自己”, 到文本 (锚3))
json [1].加成员 (json [2].取数据文本 (), , 真)
Json待发送 = json [1].取数据文本 ()
json [1].清除 ()
json [2].清除 ()
服务器1.发送数据 (客户, Json待发送, )
延迟 (500)
调试输出 (Json待发送)
.计次循环尾 ()
.子程序 _服务器1_数据到达
.局部变量 数据, 文本型
数据 = 到文本 (服务器1.取回数据 ())
客户 = 服务器1.取回客户 ()
.如果 (数据 = “开始”)
服务器1.发送数据 (客户, “do”, )
' 账号验证等待加入
.否则
服务器1.发送数据 (客户, “error”, )
.如果结束
.子程序 _服务器1_客户进入
客户 = 服务器1.取回客户 ()
.子程序 _卢姥爷行为_反馈事件, 整数型
.参数 参数一, 整数型
.参数 参数二, 整数型