动态创建子程序

.版本 2
.支持库 spec

.程序集 启动窗口, , , ' 本源码来自三叶资源网(www.sanye.cx)
.程序集变量 动态子程序, 整数型

.子程序 __启动窗口_创建完毕
.局部变量 拷贝子程序, 整数型

动态子程序 ＝ 全局堆栈分配_ (64, 113)
写到内存 ({ 86, 87, 83, 141, 116, 36, 16, 131, 236, 4, 139, 252, 252, 185, 1, 0, 0, 0, 243, 165 }, 动态子程序, 20)
写到内存 ({ 232 } ＋ 到字节集 (到整数 (动态子程序 ＋ 31 － (动态子程序 ＋ 20) － 5)), 动态子程序 ＋ 20, 5)
写到内存 ({ 91, 95, 94, 194, 4, 0 }, 动态子程序 ＋ 25, 6)
写到内存 ({ 85, 139, 236, 129, 236, 24, 0, 0, 0, 219, 69, 8, 221, 93, 248, 221, 69, 248, 219, 69, 8, 221, 93, 240, 220, 69, 240, 221, 93, 232, 221, 69, 232 }, 动态子程序 ＋ 31, 33)
写到内存 ({ 232 } ＋ 到字节集 (到整数 (动态子程序 ＋ 75 － (动态子程序 ＋ 64) － 5)), 动态子程序 ＋ 64, 5)
写到内存 ({ 139, 229, 93, 194, 4, 0 }, 动态子程序 ＋ 69, 6)
写到内存 ({ 85, 139, 236, 131, 196, 244, 217, 125, 254, 102, 139, 69, 254, 128, 204, 12, 102, 137, 69, 252, 217, 109, 252, 223, 125, 244, 217, 109, 254, 139, 69, 244, 139, 85, 248, 139, 229, 93, 195 }, 动态子程序 ＋ 75, 39)
拷贝子程序 ＝ 取子程序真实地址 (&子程序)
VirtualProtect (拷贝子程序, 5, 64, 0)
写到内存 ({ 233 } ＋ 到字节集 (到整数 (动态子程序 － 拷贝子程序 － 5)), 拷贝子程序, 5)

.子程序 _按钮1_被单击
.局部变量 返回值, 整数型

调用子程序 (动态子程序, , 返回值, 10)
信息框 (返回值, 0, )

.子程序 _按钮2_被单击

信息框 (参考子程序 (10), 0, , )  ' 本源码来自三叶资源网(www.sanye.cx)

.子程序 _按钮3_被单击

信息框 (子程序 (10), 0, )

.子程序 参考子程序, 整数型, , 上面代码用动态方式模仿该子程序
.参数 a, 整数型

返回 (a ＋ a)

.子程序 子程序, 整数型, , 本子程序将被动态创建的子程序替代
.参数 a

返回 (0)

@梦优勿扰