由于我初学的易语言
不太懂易语言
只能做到做一个简单的程序
先求师傅一位
切入正题
.版本 2
.程序集 窗口程序集1
.子程序 _启动子程序, 整数型
变量 ＝ 分割文本 (#常量, “;”, )
返回 (0)
.子程序 Interface_Vip, 整数型, 公开
.参数 ParamA
.参数 ParamB
.参数 ParamC
返回 (初始化_ (ParamA, ParamB, ParamC, &初始化子程序, &热键子程序一, &热键子程序二, &热键子程序三, &热键子程序四))
.子程序 初始化子程序, , , #Home
定时信息框_ (取系统时间_ (), 0, “Test”, 3000, 0)
.子程序 热键子程序一, , , #F9
还原 ＝ 写内存整数型 (获取当前进程伪句柄 (), 十六到十_ (解密数据_ (变量 [1])), 假)
.如果真 (还原 ＝ 0)
定时信息框_ (“Eror:Memory address error!”, 16, “Test”, 3000, 0)
返回 ()
.如果真结束
写内存整数型( 获取当前进程伪句柄 (), 十六到十_ (解密数据_ (变量 [1])), 到整数 (解密数据_ (变量 [2])))
时钟 ＝ 创建定时器 (3000, &热键子程序二)
.子程序 热键子程序二, , , #F10
.参数 uID, 整数型
.参数 uMsg, 整数型
.参数 dwUser, 整数型
.参数 dw1, 整数型
.参数 dw2, 整数型
如果真 (还原 ≠ 0)
写内存整数型 ( 获取当前进程伪句柄 (), 十六到十_ (解密数据_ (变量 [1])), 还原)
还原 ＝ 0
销毁定时器 (时钟)
望大家做出兄弟连的影子系统
