.版本 2
.子程序 编码_UniBigEnd到Ansi, 文本型
.参数 UniBigEnd, 文本型, , 十六进制
.局部变量 data, 文本型
.局部变量 i, 整数型
.局部变量 push, 文本型, , "0"
data ＝ UniBigEnd
.变量循环首 (2, 取文本长度 (data), 2, i)
加入成员 (push, 取文本中间 (data, i － 1, 2))
.如果真 (i ％ 4 ＝ 0)
交换变量 (push [取数组成员数 (push) － 1], push [取数组成员数 (push)])
.如果真结束
.变量循环尾 ()
返回 (编码_Unicode到Ansi (字节集_十六进制到字节集 (数组_合并 (push, “”))))