|
数据包 | |
|
文件类型 | 字节型 | | |
文件长度 | 整数型 | | |
文件数据 | 字节集 | | |
窗口程序集名 | 保 留 | 保 留 | 备 注 |
窗口程序集_启动窗口 | | | |
变量名 | 类 型 | 静态 | 数组 | 备 注 |
编码_数据包 | 数据包 | | |
解码_数据包 | 数据包 | | |
编码数据 | 字节集 | | |
测试数据 | 字节集 | | |
测试数据 =
{ 1, 2, 3
}解码_数据包.文件类型 = 1
解码_数据包.文件长度 =
取字节集长度 (测试数据
)解码_数据包.文件数据 = 测试数据
编码数据 =
编码 (解码_数据包
)调试输出 (“编码数据”, 编码数据
)
判断 (解码 (编码数据, 解码_数据包
))
调试输出 (“解码-成功”, 解码_数据包.文件类型, 解码_数据包.文件长度, 解码_数据包.文件数据
)
调试输出 (“解码-失败”)
数据 =
{ }数据 = 数据 +
到字节集 (到字节 (数据包.文件类型
))
数据 = 数据 +
到字节集 (到整数 (数据包.文件长度
))
数据 = 数据 +
到字节集 (到字节集 (数据包.文件数据
))
返回 (数据
)
如果真 (取字节集长度 (原始数据
) < 1 + 4
)
返回 (假)偏移 = 1数据包.文件类型 =
取字节集数据 (取字节集中间 (原始数据, 偏移, 1
),
#字节型, )偏移 = 偏移 + 1
数据包.文件长度 =
取字节集数据 (取字节集中间 (原始数据, 偏移, 4
),
#整数型, )偏移 = 偏移 + 4
数据包.文件数据 =
取字节集中间 (原始数据, 偏移, 数据包.文件长度
)返回 (数据包.文件长度 =
取字节集长度 (数据包.文件数据
))