求助如何简化代码

私人云

请问各位大佬如何用一句话写出下面的jz+偏移啊？
例如：
内存.读整数 (进程ID, 地址 ＋ 进制_十六到十 (“00ACE5E0+4+14+78”))

我用的精E模块

  

局部变量 地址, 整数型
局部变量 偏移1, 整数型
局部变量 偏移2, 整数型
局部变量 偏移3, 整数型
局部变量 偏移4, 整数型
局部变量 内存1, 类_内存
地址 ＝ 内存.读整数 (进程ID, 模块ID ＋ 进制_十六到十 (“00ACE5E0”))
偏移1 ＝ 内存.读整数 (进程ID, 地址 ＋ 进制_十六到十 (“4”))
偏移2 ＝ 内存.读整数 (进程ID, 偏移1 ＋ 进制_十六到十 (“14”))
偏移3 ＝ 内存.读整数 (进程ID, 偏移2 ＋ 进制_十六到十 (“78”))
调试输出 (偏移3)

.版本 2<br /> <br /> 局部变量 地址, 整数型<br /> 局部变量 偏移1, 整数型<br /> 局部变量 偏移2, 整数型<br /> 局部变量 偏移3, 整数型<br /> 局部变量 偏移4, 整数型<br /> 局部变量 内存1, 类_内存<br /> <br /> 地址 ＝ 内存.读整数 (进程ID, 模块ID ＋ 进制_十六到十 (“00ACE5E0”))<br /> 偏移1 ＝ 内存.读整数 (进程ID, 地址 ＋ 进制_十六到十 (“4”))<br /> 偏移2 ＝ 内存.读整数 (进程ID, 偏移1 ＋ 进制_十六到十 (“14”))<br /> 偏移3 ＝ 内存.读整数 (进程ID, 偏移2 ＋ 进制_十六到十 (“78”))<br /> 调试输出 (偏移3)

jin1oo1

  

子程序名	返回值类型	公开	备 注
读游戏内存整数	整数型		读取内存地址数据
参数名	类 型	参考	可空	数组	备 注
进程ID	整数型				游戏进程标识符
jz	文本型				欲读取的内存jz(十六进制)
偏移1	文本型				没有请留空 (十六进制)
偏移2	文本型				没有请留空 (十六进制)
偏移3	文本型				没有请留空 (十六进制)
偏移4	文本型				没有请留空 (十六进制)

变量名	类 型	静态	数组	备 注
数据	整数型

数据 ＝ 读内存整数型 (进程ID, 到数值 (到十进制 (jz)))
如果真 (是否为空 (偏移1))
返回 (数据)
数据 ＝ 读内存整数型 (进程ID, 数据 ＋ 到数值 (到十进制 (偏移1)))
如果真 (是否为空 (偏移2))
返回 (数据)
数据 ＝ 读内存整数型 (进程ID, 数据 ＋ 到数值 (到十进制 (偏移2)))
如果真 (是否为空 (偏移3))
返回 (数据)
数据 ＝ 读内存整数型 (进程ID, 数据 ＋ 到数值 (到十进制 (偏移3)))
如果真 (是否为空 (偏移4))
返回 (数据)
数据 ＝ 读内存整数型 (进程ID, 数据 ＋ 到数值 (到十进制 (偏移4)))
返回 (数据)

.版本 2<br /> <br /> .子程序 读游戏内存整数, 整数型, 公开, 读取内存地址数据<br /> .参数 进程ID, 整数型, , 游戏进程标识符<br /> .参数 jz, 文本型, , 欲读取的内存jz(十六进制)<br /> .参数 偏移1, 文本型, 可空, 没有请留空 (十六进制)<br /> .参数 偏移2, 文本型, 可空, 没有请留空 (十六进制)<br /> .参数 偏移3, 文本型, 可空, 没有请留空 (十六进制)<br /> .参数 偏移4, 文本型, 可空, 没有请留空 (十六进制)<br /> .局部变量 数据, 整数型<br /> <br /> 数据 ＝ 读内存整数型 (进程ID, 到数值 (到十进制 (jz)))<br /> .如果真 (是否为空 (偏移1))<br />     返回 (数据)<br /> .如果真结束<br /> 数据 ＝ 读内存整数型 (进程ID, 数据 ＋ 到数值 (到十进制 (偏移1)))<br /> .如果真 (是否为空 (偏移2))<br />     返回 (数据)<br /> .如果真结束<br /> 数据 ＝ 读内存整数型 (进程ID, 数据 ＋ 到数值 (到十进制 (偏移2)))<br /> .如果真 (是否为空 (偏移3))<br />     返回 (数据)<br /> .如果真结束<br /> 数据 ＝ 读内存整数型 (进程ID, 数据 ＋ 到数值 (到十进制 (偏移3)))<br /> .如果真 (是否为空 (偏移4))<br />     返回 (数据)<br /> .如果真结束<br /> 数据 ＝ 读内存整数型 (进程ID, 数据 ＋ 到数值 (到十进制 (偏移4)))<br /> 返回 (数据)

大漠小鸟

  

变量名	类 型	静态	数组	备 注
进程ID	整数型
模块ID	整数型
jz	文本型
内存地址	整数型

' 模块地址+jz
jz ＝ 取十六进制文本 (模块ID ＋ 进制_十六到十_汇编 (“00ACE5E0”))
' 取出最终定向的内存地址
内存地址 ＝ 取表达式地址 (进程ID, jz ＋ “4+14+78”)
' 根据需求对该进程内存进行读或写操作即可
内存.读整数 (进程ID, 内存地址)

子程序名	返回值类型	公开	备 注
取表达式地址	整数型		返回表达式最终指向的内存地址。不带模块名。
参数名	类 型	参考	可空	数组	备 注
进程ID	整数型
表达式地址	文本型				jz+偏移1+偏移2。

变量名	类 型	静态	数组	备 注
文本长度	整数型
终止位置	整数型
起始位置	整数型
十六进制地址	文本型
内存地址	整数型
进程句柄	整数型

文本长度 ＝ 取文本长度 (表达式地址)
如果真 (文本长度 ＜ 1)
返回 (0)

进程句柄 ＝ OpenProcess (2035711, 0, 进程ID)
如果真 (进程句柄 ＝ 0)
调试输出 (“打开进程失败”)
返回 (0)

文本长度 ＝ 文本长度 ＋ 1
起始位置 ＝ 1
循环判断首 ()
终止位置 ＝ 寻找文本 (表达式地址, “+”, 终止位置 ＋ 1, 假)
如果真 (终止位置 ＝ -1)
终止位置 ＝ 文本长度

十六进制地址 ＝ 取文本中间 (表达式地址, 起始位置, 终止位置 － 起始位置)
起始位置 ＝ 终止位置 ＋ 1
内存地址 ＝ 内存地址 ＋ 进制_十六到十_汇编 (十六进制地址)
如果真 (终止位置 ≠ 文本长度)
ReadProcessMemory_整数型 (进程句柄, 内存地址, 内存地址, 4, 0)

循环判断尾 (终止位置 ≠ 文本长度)
CloseHandle (进程句柄)
返回 (内存地址)

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

.版本 2<br /> .支持库 spec<br /> <br /> .局部变量 进程ID, 整数型<br /> .局部变量 模块ID, 整数型<br /> .局部变量 jz, 文本型<br /> .局部变量 内存地址, 整数型<br /> <br /> <br /> ' 模块地址+jz<br /> jz ＝ 取十六进制文本 (模块ID ＋ 进制_十六到十_汇编 (“00ACE5E0”))<br /> ' 取出最终定向的内存地址<br /> 内存地址 ＝ 取表达式地址 (进程ID, jz ＋ “4+14+78”)<br /> ' 根据需求对该进程内存进行读或写操作即可<br /> 内存.读整数 (进程ID, 内存地址)<br /> <br /> <br /> .子程序 取表达式地址, 整数型, , 返回表达式最终指向的内存地址。不带模块名。<br /> .参数 进程ID, 整数型<br /> .参数 表达式地址, 文本型, , jz+偏移1+偏移2。<br /> .局部变量 文本长度, 整数型<br /> .局部变量 终止位置, 整数型<br /> .局部变量 起始位置, 整数型<br /> .局部变量 十六进制地址, 文本型<br /> .局部变量 内存地址, 整数型<br /> .局部变量 进程句柄, 整数型<br /> <br /> 文本长度 ＝ 取文本长度 (表达式地址)<br /> .如果真 (文本长度 ＜ 1)<br />     返回 (0)<br /> .如果真结束<br /> <br /> 进程句柄 ＝ OpenProcess (2035711, 0, 进程ID)<br /> .如果真 (进程句柄 ＝ 0)<br />     调试输出 (“打开进程失败”)<br />     返回 (0)<br /> .如果真结束<br /> <br /> <br /> 文本长度 ＝ 文本长度 ＋ 1<br /> <br /> 起始位置 ＝ 1<br /> .循环判断首 ()<br /> <br />     终止位置 ＝ 寻找文本 (表达式地址, “+”, 终止位置 ＋ 1, 假)<br />     .如果真 (终止位置 ＝ -1)<br />         终止位置 ＝ 文本长度<br />     .如果真结束<br /> <br />     十六进制地址 ＝ 取文本中间 (表达式地址, 起始位置, 终止位置 － 起始位置)<br />     起始位置 ＝ 终止位置 ＋ 1<br /> <br />     内存地址 ＝ 内存地址 ＋ 进制_十六到十_汇编 (十六进制地址)<br /> <br />     .如果真 (终止位置 ≠ 文本长度)<br />         ReadProcessMemory_整数型 (进程句柄, 内存地址, 内存地址, 4, 0)<br />     .如果真结束<br /> <br /> .循环判断尾 (终止位置 ≠ 文本长度)<br /> CloseHandle (进程句柄)<br /> 返回 (内存地址)

私人云

jin1oo1 发表于 2024-9-12 20:43
[e=0].版本 2

.子程序 读游戏内存整数, 整数型, 公开, 读取内存地址数据

.版本 2

    数据 ＝ 内存.读整数 (进程ID, 模块ID ＋ 到文本 (进制_十到十六 (到数值 (传参.jz))))
    .如果真 (是否为空 (传参.偏移1))
        返回 (到文本 (数据))
    .如果真结束
    数据 ＝ 内存.读整数 (进程ID, 数据 ＋ 进制_十到十六 (传参.偏移1))
    .如果真 (是否为空 (传参.偏移2))
        返回 (到文本 (数据))
    .如果真结束
    数据 ＝ 内存.读整数 (进程ID, 数据 ＋ 到文本 (进制_十到十六 (传参.偏移2)))
    .如果真 (是否为空 (传参.偏移3))
        返回 (到文本 (数据))
    .如果真结束
    数据 ＝ 内存.读整数 (进程ID, 数据 ＋ 到文本 (进制_十到十六 (传参.偏移3)))
    .如果真 (是否为空 (传参.偏移4))
        返回 (到文本 (数据))
    .如果真结束
    数据 ＝ 内存.读整数 (进程ID, 数据 ＋ 到文本 (进制_十到十六 (传参.偏移4)))
    .如果真 (是否为空 (传参.偏移5))
        返回 (到文本 (数据))
    .如果真结束
    数据 ＝ 内存.读整数 (进程ID, 数据 ＋ 到文本 (进制_十到十六 (传参.偏移5)))
    返回 (到文本 (数据))
.如果结束

一直提示：错误(10044): 不能将“文本型”数据转换到“双精度小数型”数据。