易语言到字节集c,易语言自内存读写文本、字节集

.子程序 _写内存文本, 整数型, , 把文本内容写到内存返回内存地址

.参数 内容, 文本型

.局部变量 l, 整数型

.局部变量 c, 整数型

c ＝ 取字节集长度 (到字节集 (内容 ＋ “分割符”))

l ＝ 申请内存 (c, 真)

写到内存 (内容 ＋ “分割符”, l, c)

返回 (l)

.子程序 _读内存文本, 文本型, , 读取内存文本，读取后立即销毁内存

.参数 内存地址, 整数型

.局部变量 局_文本, 文本型

局_文本 ＝ 文本_取左边 (指针到文本 (内存地址), “分割符”, , )

释放内存 (内存地址)

返回 (局_文本)

.子程序 _写内存字节集, 整数型, , 返回内存地址，长度用变量接收

.参数 内容, 字节集

.参数 长度, 整数型, 参考

.局部变量 局_申请地址, 整数型

.局部变量 局_长度, 整数型

局_长度 ＝ 取字节集长度 (内容)

局_申请地址 ＝ 申请内存 (局_长度, 真)

写到内存 (内容, 局_申请地址, 局_申请地址)

长度 ＝ 局_长度

返回 (局_申请地址)

.子程序 _读内存字节集, 字节集, , 返回内存字节集，读取后立即销毁内存

.参数 地址, 整数型

.参数 长度, 整数型

.局部变量 局_内容, 字节集

局_内容 ＝ 指针到字节集 (地址, 长度)

释放内存 (地址)