文本无缝分割功能

.如果真 (删全部空 (编辑框1.内容) ≠ “”)
调试输出 (取文本长度 (编辑框1.内容))
.计次循环首 (取文本长度 (编辑框1.内容), 计次)
文本变量 ＝ 取文本中间 (编辑框1.内容, 计次, 1)
文本变量_组合 ＝ 文本变量_组合 ＋ 到文本 (取字节集数据 (到字节集 (文本变量), 3, )) ＋ “,”
.计次循环尾 ()
文本变量_数组 ＝ 分割文本 (文本变量_组合, “,”, )
计次_1 ＝ 1
.判断循环首 (计次_1 ≠ 取数组成员数 (文本变量_数组) ＋ 1)
文本变量_重组 ＝ 文本变量_数组 [计次_1]
文本标示 ＝ 到整数 (文本变量_重组)
.如果 (文本标示 ＞ 122)
编辑框3.加入文本 (取文本中间 (编辑框1.内容, 计次_1, 2) ＋ #换行符)
计次_1 ＝ 计次_1 ＋ 2
.否则
编辑框3.加入文本 (取文本中间 (编辑框1.内容, 计次_1, 1) ＋ #换行符)
计次_1 ＝ 计次_1 ＋ 1
.如果结束
.判断循环尾 ()
.如果真结束
最终文本数组 ＝ 分割文本 (编辑框3.内容, #换行符, )
调试输出 (最终文本数组)
标签4.标题 ＝ “分割文本后的数组有：” ＋ 到文本 (取数组成员数 (最终文本数组)) ＋ “个”
编辑框3.内容 ＝ “”
.计次循环首 (取数组成员数 (最终文本数组), 计次_2)
编辑框4.加入文本 (“[” ＋ 最终文本数组 [计次_2] ＋ “]”)
.计次循环尾 ()