e2ee仿精易json（为了使用编程助手方便）

曲终人散

谢谢分享学习一下

xingyang

支持开源，学习一下

pipicool

学习一下

wjswzj0

支持开源~！感谢分享

xiaoniu1230

感谢分享 支持开源 ！

1109898791

最新，已经在稳定使用中了，速度嘎嘎快

  

窗口程序集名	保 留	保 留	备 注
json_ex
变量名	类 型	数组	备 注
json1	存取键值表
json2	文本型

子程序名	返回值类型	公开	备 注
_初始化			当基于本类的对象被创建后，此方法会被自动调用

子程序名	返回值类型	公开	备 注
_销毁			当基于本类的对象被销毁前，此方法会被自动调用

子程序名	返回值类型	公开	备 注
解析	逻辑型
参数名	类 型	参考	可空	数组	备 注
json	文本型
a	逻辑型				空
b	逻辑型				空

变量名	类 型	静态	数组	备 注
bool	逻辑型

bool ＝ json1.从JSON载入 (json, , , )
返回 (bool)

子程序名	返回值类型	公开	备 注
取属性	文本型
参数名	类 型	参考	可空	数组	备 注
文本	文本型

变量名	类 型	静态	数组	备 注
arr	文本型		0
arr1	文本型		0
i	整数型
arr0	文本型		0
内容	文本型

文本 ＝ “//” ＋ 文本
判断 (寻找文本 (文本, “['”, , 假) ＞ -1)
如果真 (寻找文本 (文本, “['”, , 假) ＞ -1)
文本_取中间_批量 (文本, “['”, “']”, arr0, , , , , , , )
文本 ＝ 文本_替换 (文本, 取数组成员数 (arr0), , , “['”, “.”, “']”, “”)
如果真 (寻找文本 (文本, “//.”, , 假) ＞ -1)
文本 ＝ 文本_替换 (文本, 1, , , “//.”, “//”)



如果真 (寻找文本 (文本, “[”, , 假) ＞ -1)
文本_取中间_批量 (文本, “[”, “]”, arr, , , , , , , )
计次循环首 (取数组成员数 (arr), i)
加入成员 (arr1, 到文本 (到整数 (arr [i]) ＋ 1))
计次循环尾 ()
计次循环首 (取数组成员数 (arr), i)
文本 ＝ 文本_替换 (文本, 1, , , arr [i], “替换”)
计次循环尾 ()
计次循环首 (取数组成员数 (arr), i)
文本 ＝ 文本_替换 (文本, 1, , , “替换”, arr1 [i])
计次循环尾 ()
内容 ＝ json1.取文本 (文本)
判断 (寻找文本 (内容, “{”, , 假) ＞ -1)
返回 (json1.取JSON值 (文本, 假, , , , ))
返回 (内容)

子程序名	返回值类型	公开	备 注
取通用属性	文本型
参数名	类 型	参考	可空	数组	备 注
文本	文本型
duix	逻辑型

变量名	类 型	静态	数组	备 注
arr	文本型		0
arr1	文本型		0
i	整数型
arr0	文本型		0
内容	文本型

文本 ＝ “//” ＋ 文本
判断 (寻找文本 (文本, “['”, , 假) ＞ -1)
如果真 (寻找文本 (文本, “['”, , 假) ＞ -1)
文本_取中间_批量 (文本, “['”, “']”, arr0, , , , , , , )
文本 ＝ 文本_替换 (文本, 取数组成员数 (arr0), , , “['”, “.”, “']”, “”)
如果真 (寻找文本 (文本, “//.”, , 假) ＞ -1)
文本 ＝ 文本_替换 (文本, 1, , , “//.”, “//”)



如果真 (寻找文本 (文本, “[”, , 假) ＞ -1)
文本_取中间_批量 (文本, “[”, “]”, arr, , , , , , , )
计次循环首 (取数组成员数 (arr), i)
加入成员 (arr1, 到文本 (到整数 (arr [i]) ＋ 1))
计次循环尾 ()
计次循环首 (取数组成员数 (arr), i)
文本 ＝ 文本_替换 (文本, 1, , , arr [i], “替换”)
计次循环尾 ()
计次循环首 (取数组成员数 (arr), i)
文本 ＝ 文本_替换 (文本, 1, , , “替换”, arr1 [i])
计次循环尾 ()
内容 ＝ json1.取文本 (文本)
判断 (寻找文本 (内容, “{”, , 假) ＞ -1)
返回 (json1.取JSON值 (文本, 假, , , , ))
返回 (内容)

子程序名	返回值类型	公开	备 注
清除	逻辑型

json2 ＝ “”
返回 (json1.清空 ())

子程序名	返回值类型	公开	备 注
文本_取中间_批量	整数型
参数名	类 型	参考	可空	数组	备 注
源文本	文本型				比如：欲取全文本为 12345
前面标识文本	文本型				3的前面为“2”
后面标识文本	文本型				3的后面为“4”
存放取出文本的数组	文本型				存放取出文本的数组
是否不区分大小写	逻辑型				是否区分大小写
文本长度大于此数的不要	整数型				文本长度大于此数的不要;如取出的文本大于50的不要;留空为不限制(下面参数中的加入的后缀不算在其中，标志文本为真那么标志算在其中)
为取出的文本加上前缀	文本型				在取出的文本前面加上一段字符或汉字！可空！
为取出的文本加上后缀	文本型				在取出的文本后面加上一段字符或汉字！可空！
连前面标识文本一起取出	逻辑型				是否连<前面标识文本>一起取出? 默认为假，不取出！
连后面标识文本一起取出	逻辑型				是否连<后面标识文本>一起取出? 默认为假，不取出！
起始位置	整数型

变量名	类 型	静态	数组	备 注
数组数量	整数型
已经找到的	整数型
StartPos	整数型
EndPos	整数型
Search	文本型
中间长度	整数型

清除数组 (存放取出文本的数组)
StartPos ＝ 起始位置
循环判断首 ()
StartPos ＝ 寻找文本 (源文本, 前面标识文本, StartPos, 是否不区分大小写)
如果 (StartPos ≠ -1)
StartPos ＝ StartPos ＋ 取文本长度 (前面标识文本)
EndPos ＝ 寻找文本 (源文本, 后面标识文本, StartPos, 是否不区分大小写)
如果 (EndPos ≠ -1)
中间长度 ＝ EndPos － StartPos
Search ＝ 取文本中间 (源文本, StartPos, 中间长度)
Search ＝ 为取出的文本加上前缀 ＋ Search ＋ 为取出的文本加上后缀
如果真 (连前面标识文本一起取出 ＝ 真)
Search ＝ 前面标识文本 ＋ Search
如果真 (连后面标识文本一起取出 ＝ 真)
Search ＝ Search ＋ 后面标识文本

如果 (文本长度大于此数的不要 ＝ 0)
加入成员 (存放取出文本的数组, Search)
如果真 (取文本长度 (Search) ＜ 文本长度大于此数的不要)
加入成员 (存放取出文本的数组, Search)

处理事件 ()
跳出循环 ()
处理事件 ()
跳出循环 ()
处理事件 ()
循环判断尾 (StartPos ≠ -1)
返回 (取数组成员数 (存放取出文本的数组))

子程序名	返回值类型	公开	备 注
文本_替换	文本型
参数名	类 型	参考	可空	数组	备 注
原文本	文本型
替换进行的次数	整数型
替换的起始位置	整数型
是否区分大小写	逻辑型
欲被替换的子文本1	文本型
用作替换的子文本1	文本型
欲被替换的子文本2	文本型
用作替换的子文本2	文本型
欲被替换的子文本3	文本型
用作替换的子文本3	文本型
欲被替换的子文本4	文本型
用作替换的子文本4	文本型
欲被替换的子文本5	文本型
用作替换的子文本5	文本型

变量名	类 型	静态	数组	备 注
局_文本	文本型

如果真 (替换的起始位置 ＝ 0)
替换的起始位置 ＝ 1
如果 (是否为空 (替换进行的次数))
局_文本 ＝ 子文本替换 (原文本, 欲被替换的子文本1, 用作替换的子文本1, 替换的起始位置, , 是否区分大小写)
局_文本 ＝ 子文本替换 (局_文本, 欲被替换的子文本2, 用作替换的子文本2, 替换的起始位置, , 是否区分大小写)
局_文本 ＝ 子文本替换 (局_文本, 欲被替换的子文本3, 用作替换的子文本3, 替换的起始位置, , 是否区分大小写)
局_文本 ＝ 子文本替换 (局_文本, 欲被替换的子文本4, 用作替换的子文本4, 替换的起始位置, , 是否区分大小写)
局_文本 ＝ 子文本替换 (局_文本, 欲被替换的子文本5, 用作替换的子文本5, 替换的起始位置, , 是否区分大小写)
局_文本 ＝ 子文本替换 (原文本, 欲被替换的子文本1, 用作替换的子文本1, 替换的起始位置, 替换进行的次数, 是否区分大小写)
局_文本 ＝ 子文本替换 (局_文本, 欲被替换的子文本2, 用作替换的子文本2, 替换的起始位置, 替换进行的次数, 是否区分大小写)
局_文本 ＝ 子文本替换 (局_文本, 欲被替换的子文本3, 用作替换的子文本3, 替换的起始位置, 替换进行的次数, 是否区分大小写)
局_文本 ＝ 子文本替换 (局_文本, 欲被替换的子文本4, 用作替换的子文本4, 替换的起始位置, 替换进行的次数, 是否区分大小写)
局_文本 ＝ 子文本替换 (局_文本, 欲被替换的子文本5, 用作替换的子文本5, 替换的起始位置, 替换进行的次数, 是否区分大小写)
返回 (局_文本)

子程序名	返回值类型	公开	备 注
置属性	逻辑型
参数名	类 型	参考	可空	数组	备 注
属性名	文本型
值	文本型
a	逻辑型

返回 (json1.置文本 (属性名, 值))

子程序名	返回值类型	公开	备 注
成员数	整数型
参数名	类 型	参考	可空	数组	备 注
文本	文本型

变量名	类 型	静态	数组	备 注
arr	文本型		0
arr1	文本型		0
i	整数型
arr0	文本型		0

文本 ＝ “//” ＋ 文本
判断 (寻找文本 (文本, “['”, , 假) ＞ -1)
如果真 (寻找文本 (文本, “['”, , 假) ＞ -1)
文本_取中间_批量 (文本, “['”, “']”, arr0, , , , , , , )
文本 ＝ 文本_替换 (文本, 取数组成员数 (arr0), , , “['”, “.”, “']”, “”)
如果真 (寻找文本 (文本, “//.”, , 假) ＞ -1)
文本 ＝ 文本_替换 (文本, 1, , , “//.”, “//”, , , , , , , , )



如果真 (寻找文本 (文本, “[”, , 假) ＞ -1)
文本_取中间_批量 (文本, “[”, “]”, arr, , , , , , , )
计次循环首 (取数组成员数 (arr), i)
加入成员 (arr1, 到文本 (到整数 (arr [i]) ＋ 1))
计次循环尾 ()
计次循环首 (取数组成员数 (arr), i)
文本 ＝ 文本_替换 (文本, 1, , , arr [i], “替换”)
计次循环尾 ()
计次循环首 (取数组成员数 (arr), i)
文本 ＝ 文本_替换 (文本, 1, , , “替换”, arr1 [i])
计次循环尾 ()
返回 (json1.取数量 (文本))

子程序名	返回值类型	公开	备 注
到json	文本型
参数名	类 型	参考	可空	数组	备 注
是否修饰	逻辑型

返回 (json1.到JSON (假, , , , ))

子程序名	返回值类型	公开	备 注
加成员	文本型
参数名	类 型	参考	可空	数组	备 注
json	文本型

如果真 (json2 ≠ “”)
json2 ＝ json2 ＋ “,” ＋ json
如果真 (json2 ＝ “”)
json2 ＝ json
返回 (json2)

子程序名	返回值类型	公开	备 注
到文本1	文本型

返回 (json2)

i支持库列表	支持库注释
e2ee	E2EE互联网服务器套件

.版本 2<br /> .支持库 e2ee<br /> <br /> .程序集 json_ex<br /> .程序集变量 json1, 存取键值表<br /> .程序集变量 json2, 文本型<br /> <br /> .子程序 _初始化, , , 当基于本类的对象被创建后，此方法会被自动调用<br /> <br /> <br /> <br /> .子程序 _销毁, , , 当基于本类的对象被销毁前，此方法会被自动调用<br /> <br /> <br /> <br /> .子程序 解析, 逻辑型, 公开<br /> .参数 json, 文本型<br /> .参数 a, 逻辑型, 可空, 空<br /> .参数 b, 逻辑型, 可空, 空<br /> .局部变量 bool, 逻辑型<br /> <br /> bool ＝ json1.从JSON载入 (json, , , )<br /> 返回 (bool)<br /> <br /> .子程序 取属性, 文本型, 公开<br /> .参数 文本, 文本型<br /> .局部变量 arr, 文本型, , "0"<br /> .局部变量 arr1, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 arr0, 文本型, , "0"<br /> .局部变量 内容, 文本型<br /> <br /> 文本 ＝ “//” ＋ 文本<br /> .判断开始 (寻找文本 (文本, “['”, , 假) ＞ -1)<br />     .如果真 (寻找文本 (文本, “['”, , 假) ＞ -1)<br />         文本_取中间_批量 (文本, “['”, “']”, arr0, , , , , , , )<br />         文本 ＝ 文本_替换 (文本, 取数组成员数 (arr0), , , “['”, “.”, “']”, “”)<br />     .如果真结束<br />     .如果真 (寻找文本 (文本, “//.”, , 假) ＞ -1)<br />         文本 ＝ 文本_替换 (文本, 1, , , “//.”, “//”)<br />     .如果真结束<br /> <br /> .默认<br /> <br /> .判断结束<br /> .如果真 (寻找文本 (文本, “[”, , 假) ＞ -1)<br />     文本_取中间_批量 (文本, “[”, “]”, arr, , , , , , , )<br />     .计次循环首 (取数组成员数 (arr), i)<br />         加入成员 (arr1, 到文本 (到整数 (arr <i>) ＋ 1))<br />     .计次循环尾 ()<br />     .计次循环首 (取数组成员数 (arr), i)<br />         文本 ＝ 文本_替换 (文本, 1, , , arr <i>, “替换”)<br />     .计次循环尾 ()<br />     .计次循环首 (取数组成员数 (arr), i)<br />         文本 ＝ 文本_替换 (文本, 1, , , “替换”, arr1 <i>)<br />     .计次循环尾 ()<br /> .如果真结束<br /> 内容 ＝ json1.取文本 (文本)<br /> .判断开始 (寻找文本 (内容, “{”, , 假) ＞ -1)<br />     返回 (json1.取JSON值 (文本, 假, , , , ))<br /> .默认<br />     返回 (内容)<br /> .判断结束<br /> <br /> <br /> .子程序 取通用属性, 文本型, 公开<br /> .参数 文本, 文本型<br /> .参数 duix, 逻辑型, 可空<br /> .局部变量 arr, 文本型, , "0"<br /> .局部变量 arr1, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 arr0, 文本型, , "0"<br /> .局部变量 内容, 文本型<br /> <br /> 文本 ＝ “//” ＋ 文本<br /> .判断开始 (寻找文本 (文本, “['”, , 假) ＞ -1)<br />     .如果真 (寻找文本 (文本, “['”, , 假) ＞ -1)<br />         文本_取中间_批量 (文本, “['”, “']”, arr0, , , , , , , )<br />         文本 ＝ 文本_替换 (文本, 取数组成员数 (arr0), , , “['”, “.”, “']”, “”)<br />     .如果真结束<br />     .如果真 (寻找文本 (文本, “//.”, , 假) ＞ -1)<br />         文本 ＝ 文本_替换 (文本, 1, , , “//.”, “//”)<br />     .如果真结束<br /> <br /> .默认<br /> <br /> .判断结束<br /> .如果真 (寻找文本 (文本, “[”, , 假) ＞ -1)<br />     文本_取中间_批量 (文本, “[”, “]”, arr, , , , , , , )<br />     .计次循环首 (取数组成员数 (arr), i)<br />         加入成员 (arr1, 到文本 (到整数 (arr <i>) ＋ 1))<br />     .计次循环尾 ()<br />     .计次循环首 (取数组成员数 (arr), i)<br />         文本 ＝ 文本_替换 (文本, 1, , , arr <i>, “替换”)<br />     .计次循环尾 ()<br />     .计次循环首 (取数组成员数 (arr), i)<br />         文本 ＝ 文本_替换 (文本, 1, , , “替换”, arr1 <i>)<br />     .计次循环尾 ()<br /> .如果真结束<br /> 内容 ＝ json1.取文本 (文本)<br /> .判断开始 (寻找文本 (内容, “{”, , 假) ＞ -1)<br />     返回 (json1.取JSON值 (文本, 假, , , , ))<br /> .默认<br />     返回 (内容)<br /> .判断结束<br /> <br /> <br /> .子程序 清除, 逻辑型, 公开<br /> <br /> json2 ＝ “”<br /> 返回 (json1.清空 ())<br /> <br /> .子程序 文本_取中间_批量, 整数型, 公开<br /> .参数 源文本, 文本型, , 比如：欲取全文本为 12345<br /> .参数 前面标识文本, 文本型, , 3的前面为“2”<br /> .参数 后面标识文本, 文本型, , 3的后面为“4”<br /> .参数 存放取出文本的数组, 文本型, 可空 数组, 存放取出文本的数组<br /> .参数 是否不区分大小写, 逻辑型, 可空, 是否区分大小写<br /> .参数 文本长度大于此数的不要, 整数型, 可空, 文本长度大于此数的不要;如取出的文本大于50的不要;留空为不限制(下面参数中的加入的后缀不算在其中，标志文本为真那么标志算在其中)<br /> .参数 为取出的文本加上前缀, 文本型, 可空, 在取出的文本前面加上一段字符或汉字！可空！<br /> .参数 为取出的文本加上后缀, 文本型, 可空, 在取出的文本后面加上一段字符或汉字！可空！<br /> .参数 连前面标识文本一起取出, 逻辑型, 可空, 是否连<前面标识文本>一起取出? 默认为假，不取出！<br /> .参数 连后面标识文本一起取出, 逻辑型, 可空, 是否连<后面标识文本>一起取出? 默认为假，不取出！<br /> .参数 起始位置, 整数型, 可空<br /> .局部变量 数组数量, 整数型<br /> .局部变量 已经找到的, 整数型<br /> .局部变量 StartPos, 整数型<br /> .局部变量 EndPos, 整数型<br /> .局部变量 Search, 文本型<br /> .局部变量 中间长度, 整数型<br /> <br /> 清除数组 (存放取出文本的数组)<br /> StartPos ＝ 起始位置<br /> .循环判断首 ()<br />     StartPos ＝ 寻找文本 (源文本, 前面标识文本, StartPos, 是否不区分大小写)<br />     .如果 (StartPos ≠ -1)<br />         StartPos ＝ StartPos ＋ 取文本长度 (前面标识文本)<br />         EndPos ＝ 寻找文本 (源文本, 后面标识文本, StartPos, 是否不区分大小写)<br />         .如果 (EndPos ≠ -1)<br />             中间长度 ＝ EndPos － StartPos<br />             Search ＝ 取文本中间 (源文本, StartPos, 中间长度)<br />             Search ＝ 为取出的文本加上前缀 ＋ Search ＋ 为取出的文本加上后缀<br /> <br />             .如果真 (连前面标识文本一起取出 ＝ 真)<br />                 Search ＝ 前面标识文本 ＋ Search<br />             .如果真结束<br />             .如果真 (连后面标识文本一起取出 ＝ 真)<br />                 Search ＝ Search ＋ 后面标识文本<br />             .如果真结束<br /> <br />             .如果 (文本长度大于此数的不要 ＝ 0)<br />                 加入成员 (存放取出文本的数组, Search)<br />             .否则<br />                 .如果真 (取文本长度 (Search) ＜ 文本长度大于此数的不要)<br />                     加入成员 (存放取出文本的数组, Search)<br />                 .如果真结束<br /> <br />             .如果结束<br />             处理事件 ()<br />         .否则<br />             跳出循环 ()<br />         .如果结束<br />         处理事件 ()<br />     .否则<br />         跳出循环 ()<br />     .如果结束<br />     处理事件 ()<br /> .循环判断尾 (StartPos ≠ -1)<br /> <br /> 返回 (取数组成员数 (存放取出文本的数组))<br /> <br /> .子程序 文本_替换, 文本型, 公开<br /> .参数 原文本, 文本型<br /> .参数 替换进行的次数, 整数型, 可空<br /> .参数 替换的起始位置, 整数型, 可空<br /> .参数 是否区分大小写, 逻辑型, 可空<br /> .参数 欲被替换的子文本1, 文本型<br /> .参数 用作替换的子文本1, 文本型<br /> .参数 欲被替换的子文本2, 文本型, 可空<br /> .参数 用作替换的子文本2, 文本型, 可空<br /> .参数 欲被替换的子文本3, 文本型, 可空<br /> .参数 用作替换的子文本3, 文本型, 可空<br /> .参数 欲被替换的子文本4, 文本型, 可空<br /> .参数 用作替换的子文本4, 文本型, 可空<br /> .参数 欲被替换的子文本5, 文本型, 可空<br /> .参数 用作替换的子文本5, 文本型, 可空<br /> .局部变量 局_文本, 文本型<br /> <br /> .如果真 (替换的起始位置 ＝ 0)<br />     替换的起始位置 ＝ 1<br /> .如果真结束<br /> .如果 (是否为空 (替换进行的次数))<br />     局_文本 ＝ 子文本替换 (原文本, 欲被替换的子文本1, 用作替换的子文本1, 替换的起始位置, , 是否区分大小写)<br />     局_文本 ＝ 子文本替换 (局_文本, 欲被替换的子文本2, 用作替换的子文本2, 替换的起始位置, , 是否区分大小写)<br />     局_文本 ＝ 子文本替换 (局_文本, 欲被替换的子文本3, 用作替换的子文本3, 替换的起始位置, , 是否区分大小写)<br />     局_文本 ＝ 子文本替换 (局_文本, 欲被替换的子文本4, 用作替换的子文本4, 替换的起始位置, , 是否区分大小写)<br />     局_文本 ＝ 子文本替换 (局_文本, 欲被替换的子文本5, 用作替换的子文本5, 替换的起始位置, , 是否区分大小写)<br /> .否则<br />     局_文本 ＝ 子文本替换 (原文本, 欲被替换的子文本1, 用作替换的子文本1, 替换的起始位置, 替换进行的次数, 是否区分大小写)<br />     局_文本 ＝ 子文本替换 (局_文本, 欲被替换的子文本2, 用作替换的子文本2, 替换的起始位置, 替换进行的次数, 是否区分大小写)<br />     局_文本 ＝ 子文本替换 (局_文本, 欲被替换的子文本3, 用作替换的子文本3, 替换的起始位置, 替换进行的次数, 是否区分大小写)<br />     局_文本 ＝ 子文本替换 (局_文本, 欲被替换的子文本4, 用作替换的子文本4, 替换的起始位置, 替换进行的次数, 是否区分大小写)<br />     局_文本 ＝ 子文本替换 (局_文本, 欲被替换的子文本5, 用作替换的子文本5, 替换的起始位置, 替换进行的次数, 是否区分大小写)<br /> .如果结束<br /> 返回 (局_文本)<br /> <br /> .子程序 置属性, 逻辑型, 公开<br /> .参数 属性名, 文本型<br /> .参数 值, 文本型<br /> .参数 a, 逻辑型, 可空<br /> <br /> 返回 (json1.置文本 (属性名, 值))<br /> <br /> .子程序 成员数, 整数型, 公开<br /> .参数 文本, 文本型, 可空<br /> .局部变量 arr, 文本型, , "0"<br /> .局部变量 arr1, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 arr0, 文本型, , "0"<br /> <br /> 文本 ＝ “//” ＋ 文本<br /> .判断开始 (寻找文本 (文本, “['”, , 假) ＞ -1)<br />     .如果真 (寻找文本 (文本, “['”, , 假) ＞ -1)<br />         文本_取中间_批量 (文本, “['”, “']”, arr0, , , , , , , )<br />         文本 ＝ 文本_替换 (文本, 取数组成员数 (arr0), , , “['”, “.”, “']”, “”)<br /> <br />     .如果真结束<br />     .如果真 (寻找文本 (文本, “//.”, , 假) ＞ -1)<br />         文本 ＝ 文本_替换 (文本, 1, , , “//.”, “//”, , , , , , , , )<br />     .如果真结束<br /> <br /> .默认<br /> <br /> .判断结束<br /> .如果真 (寻找文本 (文本, “[”, , 假) ＞ -1)<br />     文本_取中间_批量 (文本, “[”, “]”, arr, , , , , , , )<br />     .计次循环首 (取数组成员数 (arr), i)<br />         加入成员 (arr1, 到文本 (到整数 (arr <i>) ＋ 1))<br />     .计次循环尾 ()<br />     .计次循环首 (取数组成员数 (arr), i)<br />         文本 ＝ 文本_替换 (文本, 1, , , arr <i>, “替换”)<br />     .计次循环尾 ()<br />     .计次循环首 (取数组成员数 (arr), i)<br />         文本 ＝ 文本_替换 (文本, 1, , , “替换”, arr1 <i>)<br />     .计次循环尾 ()<br /> .如果真结束<br /> 返回 (json1.取数量 (文本))<br /> <br /> .子程序 到json, 文本型, 公开<br /> .参数 是否修饰, 逻辑型, 可空<br /> <br /> 返回 (json1.到JSON (假, , , , ))<br /> <br /> .子程序 加成员, 文本型, 公开<br /> .参数 json, 文本型<br /> <br /> .如果真 (json2 ≠ “”)<br />     json2 ＝ json2 ＋ “,” ＋ json<br /> .如果真结束<br /> .如果真 (json2 ＝ “”)<br />     json2 ＝ json<br /> .如果真结束<br /> 返回 (json2)<br /> <br /> .子程序 到文本1, 文本型, 公开<br /> <br /> 返回 (json2)

夏亿

感谢分享

wkxq

顶一下