.版本 2
.支持库 OPenGL
.子程序 文本处理函数, 文本型
.参数 str, 文本型
.局部变量 i, 整数型
.局部变量 str2, 文本型
.如果 (str = “”)
返回 (“”)
.否则
.如果结束
str2 = “”
i = 1
.判断循环首 (i ≤ 取文本长度 (str))
.如果 (是否为双字节字符 (str, i - 1))
str2 = str2 + 取文本中间 (str, i, 2) + “,”
i = i + 2
.否则
str2 = str2 + 取文本中间 (str, i, 1) + “,”
i = i + 1
.如果结束
.判断循环尾 ()
返回 (str2)
先判断字符是不是双字节字符,再插入逗号