求子程序写法！

大海无量佛

从网上找到一个源码，是用来修改游戏的工具。编译提示 错误(10002): 指定子程序或类方法名称“十六进制取反无分割”未找到。 除了这个 还有 “字节集到十六进制无分割”  。这两个子程序源码里都没有，应该是写成了模块，我现在想高出这两个模块，或者用其他模块替换，求指教。





用一个现成的工具，举个例子说明下哈 10876是读取文件后显示的十进制数字，因为在16进制文件中是以16进制显示的，所有应该有个高低位的问题，10876的16进制是  2A7C  但是在文件中显示应该是    7C 2A  源码中的“十六进制取反无分割”就是这个目的吧！


补充内容 (2021-1-19 15:25):
.版本 2
.支持库 xplib

.程序集 窗口程序集1
.程序集变量 文件号, 整数型

.子程序 __启动窗口_创建完毕

XP风格 (2)
文件号 ＝ 打开文件 (“mt_server”, , )
...

补充内容 (2021-1-19 15:31):
.版本 2



.子程序 还原无空格字节集, 字节集
.参数 原始16进制文本, 文本型
.局部变量 Bin_字节集, 字节集
.局部变量 Bin_次数, 整数型
.局部变量 Bin_临时变量, 整数型

Bin_字节集 ＝ {  }
.变量循环首 (1, 取文本长度 (原始16进制文本), 2, Bin_次数)

    Bin_临时变量 ＝ 取十进制 (取文本中间 (原始16进制文本, Bin_次数, 2), 0)

    Bin_字节集 ＝ Bin_字节集 ＋ 取字节集左边 (到字节集 (Bin_临时变量), 1)
.变量循环尾 ()
返回 (Bin_字节集)

.子程序 转换成十六进制, 文本型
.参数 十进制文本, 文本型
.参数 长度, 整数型

返回 (十六进制取反无分割 (进制转换 (十进制文本, 10, 16), 长度))

.子程序 转换成整数文本, 文本型
.参数 字节集数据, 字节集
.参数 字节长度, 整数型

返回 (进制转换 (十六进制取反无分割 (字节集到十六进制无分割 (字节集数据), 字节长度), 16, 10))

.子程序 取指定长度字节集, 字节集
.参数 文本内容, 文本型
.参数 长度, 整数型
.局部变量 返回数据, 字节集
.局部变量 x, 整数型

返回数据 ＝ 到字节集 (文本内容)
.计次循环首 (长度 － 取文本长度 (文本内容), x)
    返回数据 ＝ 返回数据 ＋ 还原无空格字节集 (“00”)
.计次循环尾 ()
返回 (返回数据)

liuyun60

.版本 2
.支持库 spec

十六进制文本 ＝ “7C2A”
转换字节集 ＝ 取空白字节集 (2)
.计次循环首 (2, i)
    转换字节集 [i] ＝ 进制_十六到十 (取文本中间 (十六进制文本, (i － 1) × 2 ＋ 1, 2))
.计次循环尾 ()
调试输出 (取字节集数据 (转换字节集, #整数型, ))

dokuro

你看下源码中哪个模块你没有，应该找到对应模块加载进去就可以了

zt8152070

精易模块
字节集_字节集到十六进制 (到字节集 (10876))

大海无量佛

dokuro 发表于 2021-1-19 11:54
你看下源码中哪个模块你没有，应该找到对应模块加载进去就可以了

找了网上1000多个模块也没有“十六进制取反无分割 和“  字节集到十六进制无分割

大海无量佛

liuyun60 发表于 2021-1-19 11:27
.版本 2
.支持库 spec

我把源码发给您，麻烦您看看如何解决可可以不