看见私信  回复一下   大佬

        感谢分享，很给力！~

厉害！！！

寄哪里看看。。。。。

po1718 发表于 2023-2-2 13:11
[e=0].版本 2
.支持库 spec

多谢 没问题了

安哥很高兴 发表于 2023-2-2 12:12
这个我取不出来

  

子程序名	返回值类型	公开	备 注
GetHex	文本型
参数名	类 型	参考	可空	数组	备 注
hProcess	整数型
lpBaseAddress	整数型

变量名	类 型	静态	数组	备 注
array	整数型
内存数据	字节集
array2	整数型
key	文本型

如果真 (ReadProcessMemory (hProcess, lpBaseAddress, array, 4, 0))
调试输出 (进制_十到十六 (array, ))
内存数据 ＝ 取空白字节集 (32)
如果真 (ReadProcessMemory_字节集 (hProcess, array, 内存数据, 32, 0))
key ＝ bin2hex (内存数据)
调试输出 (key)

返回 (key)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> <br /> <br /> .子程序 GetHex, 文本型<br /> .参数 hProcess, 整数型<br /> .参数 lpBaseAddress, 整数型<br /> .局部变量 array, 整数型<br /> .局部变量 内存数据, 字节集<br /> .局部变量 array2, 整数型<br /> .局部变量 key, 文本型<br /> <br /> .如果真 (ReadProcessMemory (hProcess, lpBaseAddress, array, 4, 0))<br />     调试输出 (进制_十到十六 (array, ))<br />     内存数据 ＝ 取空白字节集 (32)<br />     .如果真 (ReadProcessMemory_字节集 (hProcess, array, 内存数据, 32, 0))<br />         key ＝ bin2hex (内存数据)<br />         调试输出 (key)<br />     .如果真结束<br /> <br /> .如果真结束<br /> 返回 (key)

po1718 发表于 2023-2-2 10:25
[e=1].版本 2

.子程序 GetHex, 文本型

这个我取不出来

  

子程序名	返回值类型	公开	备 注
GetHex	文本型
参数名	类 型	参考	可空	数组	备 注
进程id	整数型
内存地址	整数型

变量名	类 型	静态	数组	备 注
局地址	整数型
bin	字节集
key	文本型

局地址 ＝ 内存.读整数 (进程id, 内存地址)
bin ＝ 内存.读字节集 (进程id, 局地址, 32)
key ＝ bin2hex (bin)
返回 (key)

.版本 2<br /> <br /> .子程序 GetHex, 文本型<br /> .参数 进程id, 整数型<br /> .参数 内存地址, 整数型<br /> .局部变量 局地址, 整数型<br /> .局部变量 bin, 字节集<br /> .局部变量 key, 文本型<br /> <br /> 局地址 ＝ 内存.读整数 (进程id, 内存地址)<br /> bin ＝ 内存.读字节集 (进程id, 局地址, 32)<br /> key ＝ bin2hex (bin)<br /> 返回 (key)

谢谢分享！