|

楼主 |
发表于 2025-2-24 22:05:56
|
显示全部楼层
甘肃省平凉市
也是琢磨出来了,感谢你的帮助,放下函数:
.版本 2
.子程序 回调函数, 整数型
.参数 buffer, 整数型
.参数 size, 整数型
.参数 nitems, 整数型
.参数 userdata, 整数型
.局部变量 字节集指针, 整数型
.局部变量 字节集数据, 字节集
.局部变量 欲传入数据, 字节集
.局部变量 缓冲区长度, 整数型
.如果真 (userdata ≠ 0)
缓冲区长度 = size × nitems
字节集指针 = userdata
字节集数据 = 指针到字节集 (字节集指针, 传入长度)
.判断开始 (传入长度 > 缓冲区长度)
欲传入数据 = 取字节集中间 (字节集数据, 已写入长度 + 1, 缓冲区长度)
已写入长度 = 已写入长度 + 缓冲区长度
.默认
欲传入数据 = 字节集数据
.如果真 (取字节集长度 (欲传入数据) = 已写入长度)
返回 (0)
.如果真结束
已写入长度 = 取字节集长度 (欲传入数据)
.判断结束
写到内存 (欲传入数据, buffer, 缓冲区长度)
返回 (取字节集长度 (欲传入数据))
.如果真结束
返回 (0)
|
|