E2EE支持库：文本过滤器，关键字检测，文本替换

E2EE支持库，文本过滤器，关键字检测，测试230万字，检测关键字0ms，过滤替换15ms，应该算非常好用的了。

@53770zhang

.版本 2
.支持库 e2ee
.支持库 spec

.程序集 窗口程序集_启动窗口

.子程序 __启动窗口_创建完毕
.局部变量 文本, 文本型
.局部变量 关键字数组, 文本型, , "0"
.局部变量 替换数组, 文本型, , "0"
.局部变量 过滤器, 文本过滤器
.局部变量 被检测文本, 文本型
.局部变量 过滤后文本, 文本型
.局部变量 映射表, 存取键值表
.局部变量 过滤后文本2, 文本型
.局部变量 文本2, 文本型
.局部变量 TXT, 文本型
.局部变量 t, 整数型

文本 ＝ “这是一段测试文本。这个世界，有儒；有道；有佛；有妖；有术士。警校毕业的许七安幽幽醒来，发现自己身处牢狱之中，三日后流放边陲.....他起初的目的只是自保，顺便在这个没有人权的社会里当个富家翁悠闲度日。”
文本2 ＝ “有一个警校毕业警察受到牢狱之灾。”
关键字数组 ＝ { “牢狱”, “警校”, “自保”, “社会” }
替换数组 ＝ { “aqa”, “bqb”, “cqc”, “dqd” }
过滤器.创建 (关键字数组, 替换数组)
过滤后文本 ＝ 过滤器.过滤 (文本2)
过滤后文本2 ＝ 过滤器.过滤 (文本)
映射表 ＝ 过滤器.取映射表 ()
调试输出 (过滤器.是否包含关键字 (文本), 过滤器.是否包含关键字 (文本2), 过滤器.是否包含关键字 (“测试一下”))
调试输出 (过滤后文本)
调试输出 (过滤后文本2)
TXT ＝ 到文本 (读入文件 (取运行目录 () ＋ “1.txt”))
调试输出 (取文本长度 (TXT))
t ＝ 取启动时间 ()
调试输出 (过滤器.是否包含关键字 (TXT))
调试输出 (取启动时间 () － t)
t ＝ 取启动时间 ()
过滤后文本 ＝ 过滤器.过滤 (TXT)
调试输出 (取启动时间 () － t)