字节集_字节集转文本ex 的改进建议

74596877

字节集_文本转字节集ex    会自动补充 {  }符号
字节集_字节集转文本ex    不会补充。。。，希望

  

子程序名	返回值类型	公开	备 注
字节集_字节集转文本ex	文本型		感谢【@贫民窟 】提供源码
参数名	类 型	参考	可空	数组	备 注
字节集	字节集

变量名	类 型	静态	数组	备 注
长度	整数型
缓冲区	字节集
缓冲区索引	整数型
i	整数型
字节	字节型
字节1	字节型
字节2	字节型
字节3	字节型

长度 ＝ BinLen (字节集)
.if (长度 ＝ 0)
return (“”)

.if (BinLeft (字节集, 1) ≠ { 123 })
字节集 ＝ { 123 } ＋ 字节集
.if (BinRight (字节集, 1) ≠ { 125 })
字节集 ＝ { 125 } ＋ 字节集

缓冲区 ＝ SpaceBin (长度 × 4 ＋ 2)
缓冲区 [1] ＝ 123
缓冲区索引 ＝ 1
.counter (长度, i)
字节 ＝ 字节集 [i]
缓冲区索引 ＝ 缓冲区索引 ＋ 1
字节1 ＝ 字节 ＼ 100
字节 ＝ 字节 － 字节1 × 100
字节2 ＝ 字节 ＼ 10
字节 ＝ 字节 － 字节2 × 10
判断 (字节1 ＞ 0)
缓冲区 [缓冲区索引] ＝ 字节1 ＋ 48
缓冲区索引 ＝ 缓冲区索引 ＋ 1
缓冲区 [缓冲区索引] ＝ 字节2 ＋ 48
缓冲区索引 ＝ 缓冲区索引 ＋ 1
.if (字节2 ＞ 0)
缓冲区 [缓冲区索引] ＝ 字节2 ＋ 48
缓冲区索引 ＝ 缓冲区索引 ＋ 1


缓冲区 [缓冲区索引] ＝ 字节 ＋ 48
判断 (长度 ＝ i)
缓冲区 [缓冲区索引 ＋ 1] ＝ 125

缓冲区索引 ＝ 缓冲区索引 ＋ 1
缓冲区 [缓冲区索引] ＝ 44

.CounterLoop ()
return (str (缓冲区))

.版本 2<br /> <br /> .子程序 字节集_字节集转文本ex, 文本型, 公开, 感谢【@贫民窟 】提供源码<br /> .参数 字节集, 字节集<br /> .局部变量 长度, 整数型<br /> .局部变量 缓冲区, 字节集<br /> .局部变量 缓冲区索引, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 字节, 字节型<br /> .局部变量 字节1, 字节型<br /> .局部变量 字节2, 字节型<br /> .局部变量 字节3, 字节型<br /> <br /> 长度 ＝ BinLen (字节集)<br /> .if (长度 ＝ 0)<br />     return (“”)<br /> .如果真结束<br /> <br /> .if (BinLeft (字节集, 1) ≠ { 123 })<br />     字节集 ＝ { 123 } ＋ 字节集<br /> .如果真结束<br /> .if (BinRight (字节集, 1) ≠ { 125 })<br />     字节集 ＝ { 125 } ＋ 字节集<br /> .如果真结束<br /> <br /> 缓冲区 ＝ SpaceBin (长度 × 4 ＋ 2)<br /> 缓冲区 [1] ＝ 123<br /> 缓冲区索引 ＝ 1<br /> <br /> .counter (长度, i)<br />     字节 ＝ 字节集 <i><br />     缓冲区索引 ＝ 缓冲区索引 ＋ 1<br /> <br />     字节1 ＝ 字节 ＼ 100<br />     字节 ＝ 字节 － 字节1 × 100<br /> <br />     字节2 ＝ 字节 ＼ 10<br /> <br />     字节 ＝ 字节 － 字节2 × 10<br /> <br />     .判断开始 (字节1 ＞ 0)<br />         缓冲区 [缓冲区索引] ＝ 字节1 ＋ 48<br />         缓冲区索引 ＝ 缓冲区索引 ＋ 1<br />         缓冲区 [缓冲区索引] ＝ 字节2 ＋ 48<br />         缓冲区索引 ＝ 缓冲区索引 ＋ 1<br />     .默认<br />         .if (字节2 ＞ 0)<br />             缓冲区 [缓冲区索引] ＝ 字节2 ＋ 48<br />             缓冲区索引 ＝ 缓冲区索引 ＋ 1<br />         .如果真结束<br /> <br />     .判断结束<br /> <br />     缓冲区 [缓冲区索引] ＝ 字节 ＋ 48<br />     .判断开始 (长度 ＝ i)<br />         缓冲区 [缓冲区索引 ＋ 1] ＝ 125<br /> <br />     .默认<br />         缓冲区索引 ＝ 缓冲区索引 ＋ 1<br />         缓冲区 [缓冲区索引] ＝ 44<br />     .判断结束<br /> <br /> .CounterLoop ()<br /> return (str (缓冲区))

改一下让这个命令也自动补充

WUYU吟殇

嗯

74596877

.if (BinLeft (字节集, 1) ≠ { 123 })
字节集 ＝ { 123 } ＋ 字节集
.if (BinRight (字节集, 1) ≠ { 125 })
字节集 ＝ { 125 } ＋ 字节集

加这几句