文本_批量替换_优化

伦乐

优化大佬的源码https://bbs.ijingyi.com/forum.php?mod=viewthread&tid=14868498支持位或选项组合

  

子程序名	返回值类型	公开	备 注
文本_批量替换_优化	文本型
参数名	类 型	参考	可空	数组	备 注
原文本	文本型
旧文本数组	文本型
新文本数组	文本型
选项	整数型				位或组合：1=区分大小写，2=使用正则，4=全局替换，8=从长到短，16=转义特殊字符  默认4

变量名	类 型	静态	数组	备 注
结果文本	文本型
i	整数型
替换次数	整数型
最小长度	整数型
索引数组	整数型		0
j	整数型
临时文本	文本型

如果真 (取数组成员数 (旧文本数组) ＝ 0 或 取数组成员数 (新文本数组) ＝ 0)
返回 (原文本)
如果真 (是否为空 (选项))
选项 ＝ 4
结果文本 ＝ 原文本
最小长度 ＝ 取数组成员数 (旧文本数组)
如果真 (最小长度 ＞ 取数组成员数 (新文本数组))
最小长度 ＝ 取数组成员数 (新文本数组)
判断 (位与 (选项, 4) ≠ 0)
替换次数 ＝ -1
替换次数 ＝ 1
判断 (位与 (选项, 8) ≠ 0)
重定义数组 (索引数组, 假, 最小长度)
计次循环首 (最小长度, i)
索引数组 [i] ＝ i
计次循环尾 ()
变量循环首 (1, 最小长度 － 1, 1, i)
变量循环首 (i ＋ 1, 最小长度, 1, j)
如果真 (取文本长度 (旧文本数组 [索引数组 [i]]) ＜ 取文本长度 (旧文本数组 [索引数组 [j]]))
临时文本 ＝ 旧文本数组 [索引数组 [i]]
旧文本数组 [索引数组 [i]] ＝ 旧文本数组 [索引数组 [j]]
旧文本数组 [索引数组 [j]] ＝ 临时文本
临时文本 ＝ 新文本数组 [索引数组 [i]]
新文本数组 [索引数组 [i]] ＝ 新文本数组 [索引数组 [j]]
新文本数组 [索引数组 [j]] ＝ 临时文本

变量循环尾 ()
变量循环尾 ()
计次循环首 (最小长度, i)
判断 (位与 (选项, 1) ≠ 0)
结果文本 ＝ 子文本替换 (结果文本, 旧文本数组 [索引数组 [i]], 新文本数组 [索引数组 [i]], , 替换次数, 真)
结果文本 ＝ 子文本替换 (结果文本, 旧文本数组 [索引数组 [i]], 新文本数组 [索引数组 [i]], , 替换次数, 假)

计次循环尾 ()
计次循环首 (最小长度, i)
判断 (位与 (选项, 1) ≠ 0)
结果文本 ＝ 子文本替换 (结果文本, 旧文本数组 [i], 新文本数组 [i], , 替换次数, 真)
结果文本 ＝ 子文本替换 (结果文本, 旧文本数组 [i], 新文本数组 [i], , 替换次数, 假)

计次循环尾 ()
返回 (结果文本)

.版本 2<br /> <br /> .子程序 文本_批量替换_优化, 文本型, 公开<br /> .参数 原文本, 文本型<br /> .参数 旧文本数组, 文本型, 数组<br /> .参数 新文本数组, 文本型, 数组<br /> .参数 选项, 整数型, 可空, 位或组合：1=区分大小写，2=使用正则，4=全局替换，8=从长到短，16=转义特殊字符  默认4<br /> .局部变量 结果文本, 文本型<br /> .局部变量 i, 整数型<br /> .局部变量 替换次数, 整数型<br /> .局部变量 最小长度, 整数型<br /> .局部变量 索引数组, 整数型, , "0"<br /> .局部变量 j, 整数型<br /> .局部变量 临时文本, 文本型<br /> <br /> .如果真 (取数组成员数 (旧文本数组) ＝ 0 或 取数组成员数 (新文本数组) ＝ 0)<br />     返回 (原文本)<br /> .如果真结束<br /> .如果真 (是否为空 (选项))<br />     选项 ＝ 4<br /> .如果真结束<br /> 结果文本 ＝ 原文本<br /> 最小长度 ＝ 取数组成员数 (旧文本数组)<br /> .如果真 (最小长度 ＞ 取数组成员数 (新文本数组))<br />     最小长度 ＝ 取数组成员数 (新文本数组)<br /> .如果真结束<br /> .判断开始 (位与 (选项, 4) ≠ 0)<br />     替换次数 ＝ -1<br /> .默认<br />     替换次数 ＝ 1<br /> .判断结束<br /> .判断开始 (位与 (选项, 8) ≠ 0)<br />     重定义数组 (索引数组, 假, 最小长度)<br />     .计次循环首 (最小长度, i)<br />         索引数组 <i> ＝ i<br />     .计次循环尾 ()<br />     .变量循环首 (1, 最小长度 － 1, 1, i)<br />         .变量循环首 (i ＋ 1, 最小长度, 1, j)<br />             .如果真 (取文本长度 (旧文本数组 [索引数组 <i>]) ＜ 取文本长度 (旧文本数组 [索引数组 [j]]))<br />                 临时文本 ＝ 旧文本数组 [索引数组 <i>]<br />                 旧文本数组 [索引数组 <i>] ＝ 旧文本数组 [索引数组 [j]]<br />                 旧文本数组 [索引数组 [j]] ＝ 临时文本<br /> <br />                 临时文本 ＝ 新文本数组 [索引数组 <i>]<br />                 新文本数组 [索引数组 <i>] ＝ 新文本数组 [索引数组 [j]]<br />                 新文本数组 [索引数组 [j]] ＝ 临时文本<br />             .如果真结束<br /> <br />         .变量循环尾 ()<br />     .变量循环尾 ()<br /> <br /> <br />     .计次循环首 (最小长度, i)<br />         .判断开始 (位与 (选项, 1) ≠ 0)<br />             结果文本 ＝ 子文本替换 (结果文本, 旧文本数组 [索引数组 <i>], 新文本数组 [索引数组 <i>], , 替换次数, 真)<br />         .默认<br />             结果文本 ＝ 子文本替换 (结果文本, 旧文本数组 [索引数组 <i>], 新文本数组 [索引数组 <i>], , 替换次数, 假)<br />         .判断结束<br /> <br />     .计次循环尾 ()<br /> <br /> .默认<br />     .计次循环首 (最小长度, i)<br />         .判断开始 (位与 (选项, 1) ≠ 0)<br />             结果文本 ＝ 子文本替换 (结果文本, 旧文本数组 <i>, 新文本数组 <i>, , 替换次数, 真)<br />         .默认<br />             结果文本 ＝ 子文本替换 (结果文本, 旧文本数组 <i>, 新文本数组 <i>, , 替换次数, 假)<br />         .判断结束<br /> <br />     .计次循环尾 ()<br /> .判断结束<br /> 返回 (结果文本)

xucy

感谢分享！！！！！！！！！

hezeyu

感谢分享！！！！！！！！！

1300886755

感谢分享

编程幼儿

好嘛，必须看看

kyo9766

直接上代码好评啊，感谢分享

mgfz

这个和精益模块那个命令，速度提升多少？

我的yyy123

学习学习

hz2020

感谢分享...

renhe2018

太实用了，这次的优化，是历史性的变革啊。