分享一个自写自用的E语言模块源码(写辅助常用的功能)
.版本 2
.子程序 读文本内存, 文本型, 公开, 返回文本 ReadProcessMemory
.参数 进程的句柄, 整数型, , hProcess , 进程的句柄
.参数 内存地址, 整数型, , lpBaseAddress,内存地址
.局部变量 返回, 整数型
.局部变量 字节集, 字节集
字节集 ＝ 取空白字节集 (255)
返回 ＝ 读内存数据_ (进程的句柄, 内存地址, 字节集, 取字节集长度 (字节集), 返回)
返回 (到文本 (字节集))
.版本 2
.子程序 内存_读宽文本内存, 文本型, 公开, 读取文本型数据(返回文本 失败返回空文本)
.参数 进程句柄, 整数型
.参数 内存地址, 整数型
.参数 长度, 整数型, 可空, 默认为20 欲读取的长度字节
.参数 偏移量, 整数型, 可空 数组
.局部变量 临时字节集, 字节集
.局部变量 操作句柄, 整数型
.局部变量 临时文本, 文本型
.局部变量 临时整数, 整数型
.局部变量 xx, 整数型
.如果真 (长度 ＝ 0)
长度 ＝ 20
.如果真结束
.计次循环首 (取数组成员数 (偏移量), xx)
读整数内存_ (进程句柄, 内存地址, 临时整数, 4, 0)
内存地址 ＝ 临时整数 ＋ 偏移量
.计次循环尾 ()
临时字节集 ＝ 取空白字节集 (长度)
读字节集内存_ (进程句柄, 内存地址, 临时字节集, 长度, 0)
临时文本 ＝ 取空白文本 (长度)
双字节到宽字符1_ (临时字节集, 临时文本, 长度)
返回 (临时文本)
完整源码：
页:
[1]