按钮点击call（事件0x409派发）

热血江湖 YGOnline.exe · 2026-09-28

整段粘贴：第一行必须是 .版本 2，缺这行易语言不认后面的 .子程序 / .参数。
行首零缩进：别自己先缩，易语言会按如果/循环自动缩进。
复制全部：按本页从上到下的顺序拼接，可直接一次粘进工程。

① 常量表9 行

.版本 2
.常量 IFManager基址, "25740828"
.常量 控件ID偏移, "12"
.常量 交易窗口槽, "1236"
.常量 组队窗口槽, "1256"
.常量 交易接受, "908"
.常量 交易拒绝, "916"
.常量 组队接受, "952"
.常量 组队拒绝, "960"

② 按钮点击call7 行

.版本 2
.子程序 按钮点击call
.参数 控件ID, 整数型
.局部变量 代码, 字节集
代码 ＝ 机器码到字节集 (“6A0068”) ＋ 取字节集左边 (到字节集 (控件ID), 4) ＋ 机器码到字节集 (“68090400008B0D0CC688018B118B0D0CC688018B4204FFD0C3”)
调用字节集 (全局_进程句柄, 代码)
返回 ()

③ 点窗口按钮26 行

.版本 2
.子程序 点窗口按钮, 逻辑型
.参数 槽偏移, 整数型
.参数 按钮偏移, 整数型
.局部变量 接口管理, 整数型
.局部变量 窗口对象, 整数型
.局部变量 按钮对象, 整数型
.局部变量 控件ID, 整数型
接口管理 ＝ 内存_读整数型 (全局_进程句柄, #IFManager基址)
.如果真 (接口管理 ≤ 65536)
返回 (假)
.如果真结束
窗口对象 ＝ 内存_读整数型 (全局_进程句柄, 接口管理 ＋ 槽偏移)
.如果真 (窗口对象 ≤ 65536)
返回 (假)
.如果真结束
按钮对象 ＝ 内存_读整数型 (全局_进程句柄, 窗口对象 ＋ 按钮偏移)
.如果真 (按钮对象 ≤ 65536)
返回 (假)
.如果真结束
控件ID ＝ 内存_读整数型 (全局_进程句柄, 按钮对象 ＋ #控件ID偏移)
.如果真 (控件ID ≤ 0)
返回 (假)
.如果真结束
按钮点击call (控件ID)
返回 (真)

④ 处理交易窗7 行

.版本 2
.子程序 处理交易窗
.如果真 (窗口是否弹出 (窗口.交易) ＝ 假)
返回 ()
.如果真结束
点窗口按钮 (窗口.交易, #交易接受)
返回 ()