deelx正则表达式测试工具

deelx正则表达式测试工具开源。
.子程序 文本_取出现次数, 整数型, 公开, 返回指定文本中指定内容出现的次数
.参数 被搜索文本, 文本型
.参数 欲搜索文本, 文本型
.参数 是否区分大小写, 逻辑型, 可空
.局部变量 位置_, 整数型
.局部变量 i, 整数型

.如果真 (取文本长度 (被搜索文本) ＞ 0 且 取文本长度 (欲搜索文本) ＞ 0)
位置_ ＝ 寻找文本 (被搜索文本, 欲搜索文本, , 取反 (是否区分大小写))
.判断循环首 (位置_ ≠ -1)
i ＝ i ＋ 1
位置_ ＝ 寻找文本 (被搜索文本, 欲搜索文本, 位置_ ＋ 取文本长度 (欲搜索文本), 取反 (是否区分大小写))
.判断循环尾 ()