阿杰 发表于 2010-11-27 09:21:50

最简单的查看字节集和还原字节集模块


.版本 2
.子程序 _临时子程序
.局部变量 查看后的字节集, 文本型
' 本名称子程序用作测试程序用,仅在开发及调试环境中有效,编译发布程序前将被系统自动清空,请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。
查看后的字节集 = 查看字节集 (到字节集 (“您好”))
输出调试文本 (查看后的字节集)
输出调试文本 (到文本 (字节集还原 (查看后的字节集)))
.子程序 查看字节集, 文本型, 公开, 以易语言的格式查看字节集,例如:{0,5}
.参数 被查看的字节集, 字节集, , 要查看的字节集
.局部变量 返回文本, 文本型
.局部变量 i
返回文本 = “{”
.计次循环首 (取字节集长度 (被查看的字节集), i)
    .如果真 (i = 取字节集长度 (被查看的字节集))
      返回文本 = 返回文本 + 到文本 (被查看的字节集 )
      跳出循环 ()
    .如果真结束
    返回文本 = 返回文本 + 到文本 (被查看的字节集 ) + “,”
.计次循环尾 ()
返回文本 = 返回文本 + “}”
返回 (返回文本)
.子程序 字节集还原, 字节集, 公开, 把以易语言格式查看字节集的文本,如:{0,5},还原为字节集格式
.参数 字节集文本, 文本型, , 用“查看字节集”返回的文本或自己写的文本,必须具有易语言的字节集格式。
.局部变量 返回字节集, 字节集
.局部变量 临时文本, 文本型
.局部变量 临时文本们, 文本型, , "0"
.局部变量 i
临时文本 = 子文本替换 (字节集文本, “{”, “”, , , 真)
临时文本 = 子文本替换 (临时文本, “}”, “”, , , 真)
临时文本们 = 分割文本 (临时文本, “,”, )
返回字节集 = 取空白字节集 (取数组成员数 (临时文本们))
.计次循环首 (取数组成员数 (临时文本们), i)
    返回字节集 = 到数值 (临时文本们 )
.计次循环尾 ()
返回 (返回字节集)


页: [1]
查看完整版本: 最简单的查看字节集和还原字节集模块