展开全部
.版本 2
.支持库 eCalc
.子程序 转换文本, 文本型32313133353236313431303231363533e58685e5aeb931333330333030
.参数 待转换的文本, 文本型
.局部变量 过滤后, 文本型, , "0"
.局部变量 转换后, 文本型
.局部变量 i, 整数型
.局部变量 d, 文本型
.局部变量 w, 文本型
.局部变量 返回的数值, 文本型
过滤后 = 分割文本 (待转换的文本, “ ”, )
.计次循环首 (取数组成员数 (过滤后), i)
转换后 = 进制转换 (过滤后 [i], 16, 10)
.如果 (i = 取数组成员数 (过滤后))
d = d + 转换后
返回的数值 = “{” + d + “}”
.否则
d = d + 转换后 + “,”
.如果结束
.计次循环尾 ()
返回 (返回的数值)
.子程序 进制转换, 文本型, 公开, 进行转换的子程序 借鉴自易语言自带例程“科学计算器”
.参数 被转换文本, 文本型
.参数 被转换进制, 整数型
.参数 转换的进制, 整数型
.局部变量 欲转换文本, 文本型, , , 输入的文本串
.局部变量 临时文本, 文本型, , , 存放从输入的文本串中取出的一个文本
.局部变量 临时数值, 长整数型
.局部变量 计次变量1, 整数型
.局部变量 计次变量2, 整数型